home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1991-11-05 | 16.3 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0d f4 20 3e 45 | 64 69 74 6f 72 0d 00 14 |..... >E|ditor...|
|00000010| 1a f4 20 41 74 6f 6d 69 | 78 20 73 63 72 65 65 6e |.. Atomi|x screen|
|00000020| 20 65 64 69 74 6f 72 0d | 00 1e 18 f4 20 54 65 72 | editor.|.... Ter|
|00000030| 6a 65 20 46 6f 6c 6d 6f | 20 a9 20 31 39 39 31 0d |je Folmo| . 1991.|
|00000040| 00 28 33 f4 20 28 44 65 | 74 74 65 20 70 72 6f 67 |.(3. (De|tte prog|
|00000050| 72 61 6d 6d 65 74 20 62 | f8 72 20 62 72 75 6b 65 |rammet b|.r bruke|
|00000060| 73 20 70 e5 20 65 67 65 | 74 20 61 6e 73 76 61 72 |s p. ege|t ansvar|
|00000070| 21 29 0d 00 32 1f f4 20 | 20 5f 5f 5f 5f 5f 5f 5f |!)..2.. | _______|
|00000080| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000090| 5f 0d 00 3c 20 f4 20 7c | 20 20 20 20 20 20 20 20 |_..< . || |
|000000a0| 20 20 20 20 20 20 20 20 | 20 20 5f 5f 5f 5f 5f 20 | | _____ |
|000000b0| 7c 0d 00 46 20 f4 20 7c | 20 54 65 72 6a 65 20 46 ||..F . || Terje F|
|000000c0| 6f 6c 6d 6f 20 20 20 20 | 20 20 7c 20 a3 20 7c 20 |olmo | | . | |
|000000d0| 7c 0d 00 50 20 f4 20 7c | 20 4e 65 64 72 65 20 c5 ||..P . || Nedre .|
|000000e0| 73 76 65 69 20 32 30 20 | 20 20 7c 5f 5f 5f 7c 20 |svei 20 | |___| |
|000000f0| 7c 0d 00 5a 20 f4 20 7c | 20 4e 31 33 30 30 20 53 ||..Z . || N1300 S|
|00000100| 61 6e 64 76 69 6b 61 20 | 20 20 20 20 20 20 20 20 |andvika | |
|00000110| 7c 0d 00 64 20 f4 20 7c | 20 4e 6f 72 77 61 79 20 ||..d . || Norway |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000130| 7c 0d 00 6e 20 f4 20 7c | 5f 5f 5f 5f 5f 5f 5f 5f ||..n . ||________|
|00000140| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000150| 7c 0d 00 78 04 0d 00 82 | 04 0d 00 8c 11 f4 20 66 ||..x....|...... f|
|00000160| 69 6c 66 6f 72 6d 61 74 | 20 3a 0d 00 96 1e f4 20 |ilformat| :..... |
|00000170| 62 6c 6b 25 2b 30 20 20 | 73 63 72 5f 64 61 74 61 |blk%+0 |scr_data|
|00000180| 20 28 31 33 2a 31 32 29 | 0d 00 a0 1e f4 20 20 20 | (13*12)|..... |
|00000190| 2b 31 35 36 20 20 74 69 | 6d 65 2f 34 20 28 6d 61 |+156 ti|me/4 (ma|
|000001a0| 78 20 32 34 39 29 0d 00 | aa 4a f4 20 20 20 2b 31 |x 249)..|.J. +1|
|000001b0| 35 37 20 20 62 61 63 6b | 67 72 6f 75 6e 64 20 73 |57 back|ground s|
|000001c0| 70 72 69 74 65 20 28 31 | 2d 3e 61 6e 74 29 2c 20 |prite (1|->ant), |
|000001d0| 30 3d 3e 62 67 3d 28 73 | 63 72 2e 6e 72 29 20 4d |0=>bg=(s|cr.nr) M|
|000001e0| 4f 44 20 28 61 6e 74 20 | 62 61 63 6b 67 72 2e 29 |OD (ant |backgr.)|
|000001f0| 0d 00 b4 1a f4 20 20 20 | 2b 31 35 38 20 20 6d 61 |..... |+158 ma|
|00000200| 73 6b 65 20 73 69 7a 65 | 20 78 0d 00 be 1a f4 20 |ske size| x..... |
|00000210| 20 20 2b 31 35 39 20 20 | 6d 61 73 6b 65 20 73 69 | +159 |maske si|
|00000220| 7a 65 20 79 0d 00 c8 30 | f4 20 20 20 2b 31 36 30 |ze y...0|. +160|
|00000230| 20 20 6d 61 73 6b 65 20 | 28 6d 61 78 20 36 2a 36 | maske |(max 6*6|
|00000240| 29 2c 20 61 6c 74 69 64 | 20 36 2a 36 20 62 79 74 |), altid| 6*6 byt|
|00000250| 65 73 21 21 0d 00 d2 04 | 0d 00 dc 20 f4 20 20 20 |es!!....|... . |
|00000260| 2b 31 39 36 20 20 32 30 | 20 61 74 6f 6d 70 61 6b |+196 20| atompak|
|00000270| 6b 65 72 20 68 76 6f 72 | 0d 00 e6 23 f4 20 61 74 |ker hvor|...#. at|
|00000280| 70 20 2b 30 20 20 61 74 | 6f 6d 6e 75 6d 6d 65 72 |p +0 at|omnummer|
|00000290| 20 28 31 30 30 2d 3e 31 | 31 39 29 0d 00 f0 20 f4 | (100->1|19)... .|
|000002a0| 20 20 20 20 20 2b 31 20 | 20 61 74 6f 6d 20 28 31 | +1 | atom (1|
|000002b0| 3d 48 20 32 3d 4f 20 33 | 3d 43 29 0d 00 fa 15 f4 |=H 2=O 3|=C).....|
|000002c0| 20 20 20 20 20 2b 32 20 | 20 6c 69 6e 6b 20 23 31 | +2 | link #1|
|000002d0| 0d 01 04 15 f4 20 20 20 | 20 20 2b 33 20 20 6c 69 |..... | +3 li|
|000002e0| 6e 6b 20 23 31 0d 01 0e | 15 f4 20 20 20 20 20 2b |nk #1...|.. +|
|000002f0| 34 20 20 6c 69 6e 6b 20 | 23 31 0d 01 18 15 f4 20 |4 link |#1..... |
|00000300| 20 20 20 20 2b 35 20 20 | 6c 69 6e 6b 20 23 31 0d | +5 |link #1.|
|00000310| 01 22 04 0d 01 2c 2b f4 | 20 62 6c 6b 25 2b 33 31 |."...,+.| blk%+31|
|00000320| 36 20 64 69 76 69 6e 66 | 6f 20 20 2b 30 20 2d 20 |6 divinf|o +0 - |
|00000330| 66 61 73 69 74 20 28 6f | 6e 2f 6f 66 66 29 0d 01 |fasit (o|n/off)..|
|00000340| 36 2d f4 20 62 6c 6b 25 | 2b 33 31 37 20 64 69 76 |6-. blk%|+317 div|
|00000350| 69 6e 66 6f 20 20 2b 31 | 20 2d 20 62 75 6e 75 73 |info +1| - bunus|
|00000360| 65 72 20 28 6f 6e 2f 6f | 66 66 29 0d 01 40 2f f4 |er (on/o|ff)..@/.|
|00000370| 20 62 6c 6b 25 2b 33 31 | 38 20 64 69 76 69 6e 66 | blk%+31|8 divinf|
|00000380| 6f 20 20 2b 32 20 2d 20 | 6e 61 76 6e 20 28 31 36 |o +2 - |navn (16|
|00000390| 20 74 65 67 6e 2b 26 30 | 44 29 0d 01 4a 17 f4 20 | tegn+&0|D)..J.. |
|000003a0| 62 6c 6b 25 2b 33 33 35 | 20 73 63 72 2e 20 65 6f |blk%+335| scr. eo|
|000003b0| 66 0d 01 54 12 f4 20 62 | 6c 6b 25 2b 34 30 30 20 |f..T.. b|lk%+400 |
|000003c0| 45 4f 46 0d 01 5e 05 3a | 0d 01 68 24 e3 20 51 25 |EOF..^.:|..h$. Q%|
|000003d0| 3d 31 20 b8 20 31 32 3a | ff 28 22 4b 45 59 20 22 |=1 . 12:|.("KEY "|
|000003e0| 2b c3 28 51 25 29 2b 22 | 22 29 3a ed 0d 01 72 0e |+.(Q%)+"|"):...r.|
|000003f0| 2a 4b 45 59 20 31 20 22 | 44 22 0d 01 7c 0e 2a 4b |*KEY 1 "|D"..|.*K|
|00000400| 45 59 20 32 20 22 47 22 | 0d 01 86 0e 2a 4b 45 59 |EY 2 "G"|....*KEY|
|00000410| 20 33 20 22 50 22 0d 01 | 90 14 ff 28 22 4b 45 59 | 3 "P"..|...("KEY|
|00000420| 20 38 20 22 2b bd 31 32 | 38 29 0d 01 9a 0a eb 20 | 8 "+.12|8)..... |
|00000430| 31 33 3a 87 0d 01 a4 18 | 64 69 72 24 3d 22 3c 41 |13:.....|dir$="<A|
|00000440| 74 6f 6d 69 78 24 44 69 | 72 3e 2e 22 0d 01 ae 1e |tomix$Di|r>."....|
|00000450| 5a 25 3d 28 8e 20 28 64 | 69 72 24 2b 22 61 6e 74 |Z%=(. (d|ir$+"ant|
|00000460| 73 63 72 65 65 6e 73 22 | 29 29 0d 01 b8 15 61 6e |screens"|))....an|
|00000470| 74 5f 73 63 72 65 65 6e | 73 25 3d 9a 23 5a 25 0d |t_screen|s%=.#Z%.|
|00000480| 01 c2 08 d9 23 5a 25 0d | 01 cc 33 f4 20 61 6e 74 |....#Z%.|..3. ant|
|00000490| 5f 73 63 72 65 65 6e 73 | 25 3d 31 36 3a 20 52 45 |_screens|%=16: RE|
|000004a0| 4d 20 61 6e 74 61 6c 6c | 20 73 6b 6a 65 72 6d 65 |M antall| skjerme|
|000004b0| 72 20 69 20 31 20 73 65 | 74 74 0d 01 d6 3d 61 62 |r i 1 se|tt...=ab|
|000004c0| 70 73 25 3d 34 30 30 20 | 3a 20 f4 20 34 30 30 20 |ps%=400 |: . 400 |
|000004d0| 62 79 74 65 73 20 70 72 | 2e 20 73 6b 6a 65 72 6d |bytes pr|. skjerm|
|000004e0| 20 28 70 6c 61 73 73 20 | 66 6f 72 20 75 74 76 69 | (plass |for utvi|
|000004f0| 64 65 6c 73 65 72 29 0d | 01 e0 11 63 75 72 5f 73 |delser).|...cur_s|
|00000500| 63 72 65 65 6e 25 3d 31 | 0d 01 ea 18 64 69 72 24 |creen%=1|....dir$|
|00000510| 3d 22 3c 41 74 6f 6d 69 | 78 24 44 69 72 3e 2e 22 |="<Atomi|x$Dir>."|
|00000520| 0d 01 f4 0e 53 70 72 4f | 70 25 3d 26 32 45 0d 01 |....SprO|p%=&2E..|
|00000530| fe 14 53 70 72 53 69 7a | 65 25 3d 31 30 32 34 2a |..SprSiz|e%=1024*|
|00000540| 35 30 0d 02 08 17 de 20 | 73 70 72 69 74 65 73 25 |50..... |sprites%|
|00000550| 20 53 70 72 53 69 7a 65 | 25 0d 02 12 17 73 70 72 | SprSize|%....spr|
|00000560| 69 74 65 73 25 21 30 3d | 53 70 72 53 69 7a 65 25 |ites%!0=|SprSize%|
|00000570| 0d 02 1c 2d c8 99 20 53 | 70 72 4f 70 25 2c 32 35 |...-.. S|prOp%,25|
|00000580| 36 2b 31 30 2c 73 70 72 | 69 74 65 73 25 2c 64 69 |6+10,spr|ites%,di|
|00000590| 72 24 2b 22 41 73 70 72 | 69 74 65 31 22 0d 02 26 |r$+"Aspr|ite1"..&|
|000005a0| 1a 41 74 6f 6d 53 70 72 | 53 7a 25 3d 32 35 36 2a |.AtomSpr|Sz%=256*|
|000005b0| 32 30 2b 31 30 32 34 0d | 02 30 19 de 20 41 74 6f |20+1024.|.0.. Ato|
|000005c0| 6d 53 70 72 25 20 41 74 | 6f 6d 53 70 72 53 7a 25 |mSpr% At|omSprSz%|
|000005d0| 0d 02 3a 43 41 74 6f 6d | 53 70 72 25 21 30 3d 41 |..:CAtom|Spr%!0=A|
|000005e0| 74 6f 6d 53 70 72 53 7a | 25 3a 41 74 6f 6d 53 70 |tomSprSz|%:AtomSp|
|000005f0| 72 25 21 34 3d 30 3a 41 | 74 6f 6d 53 70 72 25 21 |r%!4=0:A|tomSpr%!|
|00000600| 38 3d 31 36 3a 41 74 6f | 6d 53 70 72 25 21 31 32 |8=16:Ato|mSpr%!12|
|00000610| 3d 31 36 0d 02 44 1b f4 | 20 43 72 65 61 74 65 20 |=16..D..| Create |
|00000620| 32 30 20 62 6c 61 6e 6b | 20 61 74 6f 6d 73 0d 02 |20 blank| atoms..|
|00000630| 4e 0e de 20 62 6c 6b 25 | 20 35 31 32 0d 02 58 27 |N.. blk%| 512..X'|
|00000640| de 20 73 63 72 65 65 6e | 73 25 20 61 62 70 73 25 |. screen|s% abps%|
|00000650| 2a 61 6e 74 5f 73 63 72 | 65 65 6e 73 25 2b 61 62 |*ant_scr|eens%+ab|
|00000660| 70 73 25 0d 02 62 27 73 | 63 72 65 6e 64 25 3d 73 |ps%..b's|crend%=s|
|00000670| 63 72 65 65 6e 73 25 2b | 61 62 70 73 25 2a 61 6e |creens%+|abps%*an|
|00000680| 74 5f 73 63 72 65 65 6e | 73 25 0d 02 6c 15 f2 72 |t_screen|s%..l..r|
|00000690| 65 61 64 5f 61 6e 74 5f | 73 70 72 69 74 65 73 0d |ead_ant_|sprites.|
|000006a0| 02 76 0e f2 76 61 72 69 | 61 62 6c 65 73 0d 02 80 |.v..vari|ables...|
|000006b0| 0f f2 63 6c 65 61 72 5f | 66 69 6c 65 0d 02 8a 2f |..clear_|file.../|
|000006c0| e3 20 51 25 3d 30 20 b8 | 20 61 6e 74 5f 73 63 72 |. Q%=0 .| ant_scr|
|000006d0| 65 65 6e 73 25 2d 31 3a | f2 62 6c 6b 5f 74 6f 5f |eens%-1:|.blk_to_|
|000006e0| 73 63 72 28 51 25 2c 30 | 29 3a ed 0d 02 94 14 f2 |scr(Q%,0|):......|
|000006f0| 6d 61 6b 65 5f 62 6c 61 | 6e 6b 61 74 6f 6d 73 0d |make_bla|nkatoms.|
|00000700| 02 9e 24 e3 20 51 25 3d | 30 20 b8 20 31 39 3a f2 |..$. Q%=|0 . 19:.|
|00000710| 6d 61 6b 65 5f 6f 6e 65 | 5f 61 74 6f 6d 28 51 25 |make_one|_atom(Q%|
|00000720| 29 3a ed 0d 02 a8 0f f2 | 63 75 72 5f 62 6c 6b 28 |):......|cur_blk(|
|00000730| 30 29 0d 02 b2 10 f2 64 | 72 61 77 5f 73 63 72 65 |0).....d|raw_scre|
|00000740| 65 6e 0d 02 bc 09 f2 6d | 61 69 6e 0d 02 c6 05 e0 |en.....m|ain.....|
|00000750| 0d 02 d0 05 3a 0d 02 da | 15 dd f2 6d 61 6b 65 5f |....:...|...make_|
|00000760| 62 6c 61 6e 6b 61 74 6f | 6d 73 0d 02 e4 0b ea 20 |blankato|ms..... |
|00000770| 51 25 2c 62 25 0d 02 ee | 1c c8 99 20 53 70 72 4f |Q%,b%...|... SprO|
|00000780| 70 25 2c 32 35 36 2b 39 | 2c 41 74 6f 6d 53 70 72 |p%,256+9|,AtomSpr|
|00000790| 25 0d 02 f8 0e fb 20 31 | 32 38 20 c8 9c 20 30 0d |%..... 1|28 .. 0.|
|000007a0| 03 02 16 e3 20 51 25 3d | 30 20 b8 20 6d 61 78 5f |.... Q%=|0 . max_|
|000007b0| 61 74 6f 6d 25 0d 03 0c | 2f 20 c8 99 20 53 70 72 |atom%...|/ .. Spr|
|000007c0| 4f 70 25 2c 32 35 36 2b | 31 35 2c 41 74 6f 6d 53 |Op%,256+|15,AtomS|
|000007d0| 70 72 25 2c c3 28 51 25 | 29 2c 30 2c 31 36 2c 31 |pr%,.(Q%|),0,16,1|
|000007e0| 36 2c 31 33 0d 03 16 26 | 20 c8 99 20 53 70 72 4f |6,13...&| .. SprO|
|000007f0| 70 25 2c 32 35 36 2b 36 | 30 2c 41 74 6f 6d 53 70 |p%,256+6|0,AtomSp|
|00000800| 72 25 2c c3 28 51 25 29 | 2c 30 0d 03 20 12 20 fb |r%,.(Q%)|,0.. . .|
|00000810| 20 31 32 38 2b 51 25 2a | 32 2b 31 32 0d 03 2a 06 | 128+Q%*|2+12..*.|
|00000820| 20 db 0d 03 34 05 ed 0d | 03 3e 1f c8 99 20 53 70 | ...4...|.>... Sp|
|00000830| 72 4f 70 25 2c 32 35 36 | 2b 36 30 2c 41 74 6f 6d |rOp%,256|+60,Atom|
|00000840| 53 70 72 25 2c 30 0d 03 | 48 05 87 0d 03 52 05 e1 |Spr%,0..|H....R..|
|00000850| 0d 03 5c 05 3a 0d 03 66 | 18 dd f2 6d 61 6b 65 5f |..\.:..f|...make_|
|00000860| 6f 6e 65 5f 61 74 6f 6d | 28 41 4e 25 29 0d 03 70 |one_atom|(AN%)..p|
|00000870| 0e ea 20 62 25 2c 51 25 | 2c 64 25 0d 03 7a 1a 62 |.. b%,Q%|,d%..z.b|
|00000880| 25 3d a4 67 65 74 5f 61 | 74 6f 6d 5f 64 61 74 61 |%=.get_a|tom_data|
|00000890| 28 41 4e 25 29 0d 03 84 | 26 c8 99 20 53 70 72 4f |(AN%)...|&.. SprO|
|000008a0| 70 25 2c 32 35 36 2b 36 | 30 2c 41 74 6f 6d 53 70 |p%,256+6|0,AtomSp|
|000008b0| 72 25 2c c3 28 41 4e 25 | 29 2c 30 0d 03 8e 10 e7 |r%,.(AN%|),0.....|
|000008c0| 20 28 62 25 3f 31 29 3e | 30 20 8c 0d 03 98 30 20 | (b%?1)>|0 ....0 |
|000008d0| c8 99 20 53 70 72 4f 70 | 25 2c 32 35 36 2b 33 34 |.. SprOp|%,256+34|
|000008e0| 2c 73 70 72 69 74 65 73 | 25 2c 22 61 22 2b c3 28 |,sprites|%,"a"+.(|
|000008f0| 62 25 3f 31 29 2c 30 2c | 30 2c 30 0d 03 a2 0f 20 |b%?1),0,|0,0.... |
|00000900| e3 20 51 25 3d 30 20 b8 | 20 33 0d 03 ac 13 20 20 |. Q%=0 .| 3.... |
|00000910| 64 25 3d 3f 28 62 25 2b | 51 25 2b 32 29 0d 03 b6 |d%=?(b%+|Q%+2)...|
|00000920| 38 20 20 e7 20 64 25 3e | 30 20 8c 20 c8 99 20 53 |8 . d%>|0 . .. S|
|00000930| 70 72 4f 70 25 2c 32 35 | 36 2b 33 34 2c 73 70 72 |prOp%,25|6+34,spr|
|00000940| 69 74 65 73 25 2c 22 6c | 22 2b c3 28 64 25 29 2c |ites%,"l|"+.(d%),|
|00000950| 30 2c 30 2c 33 0d 03 c0 | 06 20 ed 0d 03 ca 05 cc |0,0,3...|. ......|
|00000960| 0d 03 d4 15 20 fb 20 31 | 32 38 2b 41 4e 25 2a 32 |.... . 1|28+AN%*2|
|00000970| 2b 31 32 3a db 0d 03 de | 05 cd 0d 03 e8 1f c8 99 |+12:....|........|
|00000980| 20 53 70 72 4f 70 25 2c | 32 35 36 2b 36 30 2c 41 | SprOp%,|256+60,A|
|00000990| 74 6f 6d 53 70 72 25 2c | 30 0d 03 f2 05 87 0d 03 |tomSpr%,|0.......|
|000009a0| fc 05 e1 0d 04 06 05 3a | 0d 04 10 18 dd a4 67 65 |.......:|......ge|
|000009b0| 74 5f 61 74 6f 6d 5f 64 | 61 74 61 28 41 4e 25 29 |t_atom_d|ata(AN%)|
|000009c0| 0d 04 1a 15 3d 62 6c 6b | 25 2b 62 61 74 6f 25 2b |....=blk|%+bato%+|
|000009d0| 41 4e 25 2a 36 0d 04 24 | 05 3a 0d 04 2e 10 dd f2 |AN%*6..$|.:......|
|000009e0| 63 6c 65 61 72 5f 66 69 | 6c 65 0d 04 38 0b ea 20 |clear_fi|le..8.. |
|000009f0| 51 25 2c 62 25 0d 04 42 | 24 e3 20 51 25 3d 30 20 |Q%,b%..B|$. Q%=0 |
|00000a00| b8 20 61 62 70 73 25 2d | 34 20 88 20 34 3a 62 6c |. abps%-|4 . 4:bl|
|00000a10| 6b 25 21 51 25 3d 30 3a | ed 0d 04 4c 11 62 25 3d |k%!Q%=0:|...L.b%=|
|00000a20| 62 6c 6b 25 2b 62 73 63 | 72 25 0d 04 56 1e e3 20 |blk%+bsc|r%..V.. |
|00000a30| 51 25 3d 30 20 b8 20 28 | 61 78 25 2b 31 29 2a 28 |Q%=0 . (|ax%+1)*(|
|00000a40| 61 79 25 2b 31 29 2d 31 | 0d 04 60 10 20 3f 62 25 |ay%+1)-1|..`. ?b%|
|00000a50| 3d 31 3a 62 25 2b 3d 31 | 0d 04 6a 05 ed 0d 04 74 |=1:b%+=1|..j....t|
|00000a60| 21 62 25 3f 30 3d 31 32 | 38 3a 62 25 3f 31 3d 30 |!b%?0=12|8:b%?1=0|
|00000a70| 3a 62 25 3f 32 3d 31 3a | 62 25 3f 33 3d 31 0d 04 |:b%?2=1:|b%?3=1..|
|00000a80| 7e 11 62 25 3d 62 6c 6b | 25 2b 62 6d 73 6b 25 0d |~.b%=blk|%+bmsk%.|
|00000a90| 04 88 1e e3 20 51 25 3d | 30 20 b8 20 28 61 78 32 |.... Q%=|0 . (ax2|
|00000aa0| 25 2b 31 29 2a 28 61 79 | 32 25 2b 31 29 0d 04 92 |%+1)*(ay|2%+1)...|
|00000ab0| 10 20 3f 62 25 3d 30 3a | 62 25 2b 3d 31 0d 04 9c |. ?b%=0:|b%+=1...|
|00000ac0| 05 ed 0d 04 a6 11 62 25 | 3d 62 6c 6b 25 2b 62 61 |......b%|=blk%+ba|
|00000ad0| 74 6f 25 0d 04 b0 0f e3 | 20 51 25 3d 30 20 b8 20 |to%.....| Q%=0 . |
|00000ae0| 31 39 0d 04 ba 10 20 62 | 25 3f 30 3d 31 30 30 2b |19.... b|%?0=100+|
|00000af0| 51 25 0d 04 c4 27 20 62 | 25 3f 31 3d 31 3a 62 25 |Q%...' b|%?1=1:b%|
|00000b00| 3f 32 3d 30 3a 62 25 3f | 33 3d 30 3a 62 25 3f 34 |?2=0:b%?|3=0:b%?4|
|00000b10| 3d 30 3a 62 25 3f 35 3d | 30 0d 04 ce 0a 20 62 25 |=0:b%?5=|0.... b%|
|00000b20| 2b 3d 36 0d 04 d8 05 ed | 0d 04 e2 05 e1 0d 04 ec |+=6.....|........|
|00000b30| 05 3a 0d 04 f6 19 dd f2 | 62 6c 6b 5f 74 6f 5f 73 |.:......|blk_to_s|
|00000b40| 63 72 28 73 63 72 25 2c | 64 25 29 0d 05 00 10 ea |cr(scr%,|d%).....|
|00000b50| 20 62 31 25 2c 62 32 25 | 2c 51 25 0d 05 0a 1b 62 | b1%,b2%|,Q%....b|
|00000b60| 31 25 3d 73 63 72 65 65 | 6e 73 25 2b 61 62 70 73 |1%=scree|ns%+abps|
|00000b70| 25 2a 73 63 72 25 0d 05 | 14 0c 62 32 25 3d 62 6c |%*scr%..|..b2%=bl|
|00000b80| 6b 25 0d 05 1e 18 e3 20 | 51 25 3d 30 20 b8 20 61 |k%..... |Q%=0 . a|
|00000b90| 62 70 73 25 2d 34 20 88 | 20 34 0d 05 28 34 20 e7 |bps%-4 .| 4..(4 .|
|00000ba0| 20 64 25 3d 30 20 8c 20 | 62 31 25 21 51 25 3d 62 | d%=0 . |b1%!Q%=b|
|00000bb0| 32 25 21 51 25 20 8b 20 | e7 20 64 25 3d 31 20 8c |2%!Q% . |. d%=1 .|
|00000bc0| 20 62 32 25 21 51 25 3d | 62 31 25 21 51 25 0d 05 | b2%!Q%=|b1%!Q%..|
|00000bd0| 32 05 ed 0d 05 3c 05 e1 | 0d 05 46 05 3a 0d 05 50 |2....<..|..F.:..P|
|00000be0| 0f dd f2 76 61 72 69 61 | 62 6c 65 73 0d 05 5a 0b |...varia|bles..Z.|
|00000bf0| 62 73 63 72 25 3d 30 0d | 05 64 0d 62 6d 73 6b 25 |bscr%=0.|.d.bmsk%|
|00000c00| 3d 31 36 30 0d 05 6e 0d | 62 61 74 6f 25 3d 31 39 |=160..n.|bato%=19|
|00000c10| 36 0d 05 78 10 64 69 76 | 69 6e 66 6f 25 3d 33 31 |6..x.div|info%=31|
|00000c20| 36 0d 05 82 16 62 6c 6b | 65 6e 64 25 3d 62 6c 6b |6....blk|end%=blk|
|00000c30| 25 2b 61 62 70 73 25 0d | 05 8c 11 61 78 25 3d 31 |%+abps%.|...ax%=1|
|00000c40| 32 3a 61 79 25 3d 31 31 | 0d 05 96 11 61 78 32 25 |2:ay%=11|....ax2%|
|00000c50| 3d 35 3a 61 79 32 25 3d | 35 0d 05 a0 35 73 6c 25 |=5:ay2%=|5...5sl%|
|00000c60| 3d 31 36 3a 73 68 25 3d | 31 36 20 3a 20 f4 20 53 |=16:sh%=|16 : . S|
|00000c70| 70 72 69 74 65 20 6c 65 | 6e 67 64 65 20 6f 67 20 |prite le|ngde og |
|00000c80| 68 f8 79 64 65 20 69 20 | 70 69 78 65 6c 73 0d 05 |h.yde i |pixels..|
|00000c90| aa 17 73 6c 25 3d 73 6c | 25 2a 34 3a 73 68 25 3d |..sl%=sl|%*4:sh%=|
|00000ca0| 73 68 25 2a 34 0d 05 b4 | 2d 6e 78 25 3d 31 32 37 |sh%*4...|-nx%=127|
|00000cb0| 39 2d 73 6c 25 2a 28 61 | 78 25 2b 31 29 3a 6e 79 |9-sl%*(a|x%+1):ny|
|00000cc0| 25 3d 31 30 32 33 2d 73 | 68 25 2a 28 61 79 25 2b |%=1023-s|h%*(ay%+|
|00000cd0| 31 29 0d 05 be 16 74 69 | 6d 65 78 25 3d 30 3a 74 |1)....ti|mex%=0:t|
|00000ce0| 69 6d 65 79 25 3d 31 35 | 0d 05 c8 17 6e 61 6d 65 |imey%=15|....name|
|00000cf0| 78 25 3d 31 36 3a 6e 61 | 6d 65 79 25 3d 32 36 0d |x%=16:na|mey%=26.|
|00000d00| 05 d2 13 6f 6e 78 25 3d | 31 30 3a 6f 6e 79 25 3d |...onx%=|10:ony%=|
|00000d10| 31 35 0d 05 dc 15 6f 6e | 25 3d 30 3a 6d 6f 6c 6e |15....on|%=0:moln|
|00000d20| 61 6d 65 24 3d 22 22 0d | 05 e6 14 62 6f 6e 78 25 |ame$="".|...bonx%|
|00000d30| 3d 39 3a 62 6f 6e 79 25 | 3d 31 33 0d 05 f0 0a 62 |=9:bony%|=13....b|
|00000d40| 6f 6e 25 3d 30 0d 05 fa | 25 73 68 6f 77 78 25 3d |on%=0...|%showx%=|
|00000d50| 34 3a 73 68 6f 77 79 25 | 3d 31 30 32 33 2d 73 68 |4:showy%|=1023-sh|
|00000d60| 25 2a 28 61 79 32 25 2b | 31 29 0d 06 04 10 6d 61 |%*(ay2%+|1)....ma|
|00000d70| 78 5f 61 74 6f 6d 25 3d | 31 39 0d 06 0e 0c 61 74 |x_atom%=|19....at|
|00000d80| 6f 6d 73 25 3d 30 0d 06 | 18 1d 73 68 6f 77 5f 61 |oms%=0..|..show_a|
|00000d90| 74 78 25 3d 30 3a 73 68 | 6f 77 5f 61 74 79 25 3d |tx%=0:sh|ow_aty%=|
|00000da0| 32 32 30 0d 06 22 25 73 | 68 6f 77 5f 61 74 70 25 |220.."%s|how_atp%|
|00000db0| 3d 30 20 3a 20 f4 20 62 | 65 67 79 6e 6e 20 6d 65 |=0 : . b|egynn me|
|00000dc0| 64 20 61 74 6f 6d 20 30 | 0d 06 2c 31 f4 20 73 68 |d atom 0|..,1. sh|
|00000dd0| 6f 77 5f 61 74 6d 25 3d | 33 20 3a 20 52 45 4d 20 |ow_atm%=|3 : REM |
|00000de0| 6b 61 6e 20 74 65 6c 6c | 65 73 20 66 72 61 20 73 |kan tell|es fra s|
|00000df0| 70 72 69 74 65 66 69 6c | 61 0d 06 36 0f 73 68 6f |pritefil|a..6.sho|
|00000e00| 77 5f 61 74 61 25 3d 36 | 0d 06 40 2f e7 20 73 68 |w_ata%=6|..@/. sh|
|00000e10| 6f 77 5f 61 74 61 25 3e | 73 68 6f 77 5f 61 74 6d |ow_ata%>|show_atm|
|00000e20| 25 20 8c 20 73 68 6f 77 | 5f 61 74 61 25 3d 73 68 |% . show|_ata%=sh|
|00000e30| 6f 77 5f 61 74 6d 25 0d | 06 4a 27 73 68 6f 77 5f |ow_atm%.|.J'show_|
|00000e40| 62 67 78 25 3d 30 3a 73 | 68 6f 77 5f 62 67 79 25 |bgx%=0:s|how_bgy%|
|00000e50| 3d 73 68 6f 77 5f 61 74 | 79 25 2b 31 30 30 0d 06 |=show_at|y%+100..|
|00000e60| 54 25 73 68 6f 77 5f 62 | 67 70 25 3d 30 20 3a 20 |T%show_b|gp%=0 : |
|00000e70| f4 20 62 65 67 79 6e 6e | 20 6d 65 64 20 62 6b 67 |. begynn| med bkg|
|00000e80| 72 20 30 0d 06 5e 31 f4 | 20 73 68 6f 77 5f 62 67 |r 0..^1.| show_bg|
|00000e90| 6d 25 3d 38 20 3a 20 52 | 45 4d 20 6b 61 6e 20 74 |m%=8 : R|EM kan t|
|00000ea0| 65 6c 6c 65 73 20 66 72 | 61 20 73 70 72 69 74 65 |elles fr|a sprite|
|00000eb0| 66 69 6c 61 0d 06 68 0f | 73 68 6f 77 5f 62 67 61 |fila..h.|show_bga|
|00000ec0| 25 3d 36 0d 06 72 2f e7 | 20 73 68 6f 77 5f 62 67 |%=6..r/.| show_bg|
|00000ed0| 61 25 3e 73 68 6f 77 5f | 62 67 6d 25 20 8c 20 73 |a%>show_|bgm% . s|
|00000ee0| 68 6f 77 5f 62 67 61 25 | 3d 73 68 6f 77 5f 62 67 |how_bga%|=show_bg|
|00000ef0| 6d 25 0d 06 7c 27 73 68 | 6f 77 5f 76 67 78 25 3d |m%..|'sh|ow_vgx%=|
|00000f00| 30 3a 73 68 6f 77 5f 76 | 67 79 25 3d 73 68 6f 77 |0:show_v|gy%=show|
|00000f10| 5f 62 67 79 25 2b 31 30 | 30 0d 06 86 25 73 68 6f |_bgy%+10|0...%sho|
|00000f20| 77 5f 76 67 70 25 3d 30 | 20 3a 20 f4 20 62 65 67 |w_vgp%=0| : . beg|
|00000f30| 79 6e 6e 20 6d 65 64 20 | 76 65 67 67 20 30 0d 06 |ynn med |vegg 0..|
|00000f40| 90 31 f4 20 73 68 6f 77 | 5f 76 67 6d 25 3d 32 20 |.1. show|_vgm%=2 |
|00000f50| 3a 20 52 45 4d 20 6b 61 | 6e 20 74 65 6c 6c 65 73 |: REM ka|n telles|
|00000f60| 20 66 72 61 20 73 70 72 | 69 74 65 66 69 6c 61 0d | fra spr|itefila.|
|00000f70| 06 9a 0f 73 68 6f 77 5f | 76 67 61 25 3d 36 0d 06 |...show_|vga%=6..|
|00000f80| a4 2f e7 20 73 68 6f 77 | 5f 76 67 61 25 3e 73 68 |./. show|_vga%>sh|
|00000f90| 6f 77 5f 76 67 6d 25 20 | 8c 20 73 68 6f 77 5f 76 |ow_vgm% |. show_v|
|00000fa0| 67 61 25 3d 73 68 6f 77 | 5f 76 67 6d 25 0d 06 ae |ga%=show|_vgm%...|
|00000fb0| 17 de 20 63 75 72 72 65 | 6e 74 25 28 61 78 25 2c |.. curre|nt%(ax%,|
|00000fc0| 61 79 25 29 0d 06 b8 16 | de 20 73 6b 61 6c 25 28 |ay%)....|. skal%(|
|00000fd0| 61 78 32 25 2c 61 79 32 | 25 29 0d 06 c2 0e de 20 |ax2%,ay2|%)..... |
|00000fe0| 63 75 72 61 25 28 35 29 | 0d 06 cc 10 63 75 72 72 |cura%(5)|....curr|
|00000ff0| 65 6e 74 25 28 29 3d 32 | 0d 06 d6 0a 61 5f 76 25 |ent%()=2|....a_v%|
|00001000| 3d 32 0d 06 e0 0a 61 5f | 62 25 3d 33 0d 06 ea 0d |=2....a_|b%=3....|
|00001010| 63 75 72 5f 61 74 25 3d | 30 0d 06 f4 0d 63 75 72 |cur_at%=|0....cur|
|00001020| 5f 65 6c 25 3d 32 0d 06 | fe 0d 63 75 72 5f 62 67 |_el%=2..|..cur_bg|
|00001030| 25 3d 31 0d 07 08 0d 74 | 69 6d 65 25 3d 31 32 38 |%=1....t|ime%=128|
|00001040| 0d 07 12 05 e1 0d 07 1c | 05 3a 0d 07 26 16 dd f2 |........|.:..&...|
|00001050| 72 65 61 64 5f 61 6e 74 | 5f 73 70 72 69 74 65 73 |read_ant|_sprites|
|00001060| 0d 07 30 1f ea 20 61 6e | 74 5f 73 70 72 25 2c 6e |..0.. an|t_spr%,n|
|00001070| 61 6d 65 24 2c 41 24 2c | 6e 72 25 2c 57 48 25 0d |ame$,A$,|nr%,WH%.|
|00001080| 07 3a 0b ea 20 6e 61 6d | 65 25 0d 07 44 0e de 20 |.:.. nam|e%..D.. |
|00001090| 6e 61 6d 65 25 20 31 36 | 0d 07 4e 2a c8 99 20 53 |name% 16|..N*.. S|
|000010a0| 70 72 4f 70 25 2c 32 35 | 36 2b 38 2c 73 70 72 69 |prOp%,25|6+8,spri|
|000010b0| 74 65 73 25 20 b8 20 2c | 2c 2c 61 6e 74 5f 73 70 |tes% . ,|,,ant_sp|
|000010c0| 72 25 0d 07 58 0f 73 68 | 6f 77 5f 61 74 6d 25 3d |r%..X.sh|ow_atm%=|
|000010d0| 30 0d 07 62 0f 73 68 6f | 77 5f 76 67 6d 25 3d 30 |0..b.sho|w_vgm%=0|
|000010e0| 0d 07 6c 0f 73 68 6f 77 | 5f 62 67 6d 25 3d 30 0d |..l.show|_bgm%=0.|
|000010f0| 07 76 15 e3 20 51 25 3d | 31 20 b8 20 61 6e 74 5f |.v.. Q%=|1 . ant_|
|00001100| 73 70 72 25 0d 07 80 2a | 20 c8 99 20 53 70 72 4f |spr%...*| .. SprO|
|00001110| 70 25 2c 32 35 36 2b 31 | 33 2c 73 70 72 69 74 65 |p%,256+1|3,sprite|
|00001120| 73 25 2c 6e 61 6d 65 25 | 2c 31 32 2c 51 25 0d 07 |s%,name%|,12,Q%..|
|00001130| 8a 0d 20 6e 61 6d 65 24 | 3d 22 22 0d 07 94 38 20 |.. name$|=""...8 |
|00001140| 57 25 3d 30 3a c8 95 20 | 6e 61 6d 65 25 3f 57 25 |W%=0:.. |name%?W%|
|00001150| 3e 31 33 20 6e 61 6d 65 | 24 3d 6e 61 6d 65 24 2b |>13 name|$=name$+|
|00001160| bd 28 6e 61 6d 65 25 3f | 57 25 29 3a 57 25 2b 3d |.(name%?|W%):W%+=|
|00001170| 31 3a ce 0d 07 9e 11 20 | 41 24 3d c0 6e 61 6d 65 |1:..... |A$=.name|
|00001180| 24 2c 31 29 0d 07 a8 21 | 20 e7 20 41 24 3d 22 61 |$,1)...!| . A$="a|
|00001190| 22 20 84 20 41 24 3d 22 | 76 22 20 84 20 41 24 3d |" . A$="|v" . A$=|
|000011a0| 22 62 22 20 8c 0d 07 b2 | 1d 20 20 6e 72 25 3d bb |"b" ....|. nr%=.|
|000011b0| 28 c2 6e 61 6d 65 24 2c | a9 6e 61 6d 65 24 2d 31 |(.name$,|.name$-1|
|000011c0| 29 29 0d 07 bc 0d 20 20 | c8 8e 20 41 24 20 ca 0d |)).... |.. A$ ..|
|000011d0| 07 c6 2e 20 20 20 c9 20 | 22 61 22 20 3a 20 e7 20 |... . |"a" : . |
|000011e0| 6e 72 25 3e 73 68 6f 77 | 5f 61 74 6d 25 20 8c 20 |nr%>show|_atm% . |
|000011f0| 73 68 6f 77 5f 61 74 6d | 25 3d 6e 72 25 0d 07 d0 |show_atm|%=nr%...|
|00001200| 2e 20 20 20 c9 20 22 76 | 22 20 3a 20 e7 20 6e 72 |. . "v|" : . nr|
|00001210| 25 3e 73 68 6f 77 5f 76 | 67 6d 25 20 8c 20 73 68 |%>show_v|gm% . sh|
|00001220| 6f 77 5f 76 67 6d 25 3d | 6e 72 25 0d 07 da 2e 20 |ow_vgm%=|nr%.... |
|00001230| 20 20 c9 20 22 62 22 20 | 3a 20 e7 20 6e 72 25 3e | . "b" |: . nr%>|
|00001240| 73 68 6f 77 5f 62 67 6d | 25 20 8c 20 73 68 6f 77 |show_bgm|% . show|
|00001250| 5f 62 67 6d 25 3d 6e 72 | 25 0d 07 e4 07 20 20 cb |_bgm%=nr|%.... .|
|00001260| 0d 07 ee 06 20 cd 0d 07 | f8 05 ed 0d 08 02 05 e1 |.... ...|........|
|00001270| 0d 08 0c 05 3a 0d 08 16 | 0d dd f2 64 69 73 63 5f |....:...|...disc_|
|00001280| 6f 70 0d 08 20 18 ea 20 | 58 25 2c 59 25 2c 62 25 |op.. .. |X%,Y%,b%|
|00001290| 2c 73 24 2c 58 2c 41 24 | 2c 5a 0d 08 2a 07 ea 20 |,s$,X,A$|,Z..*.. |
|000012a0| 85 0d 08 34 4a ee 20 85 | 20 ea 20 e7 20 9f 3d 31 |...4J. .| . . .=1|
|000012b0| 37 20 8c 20 e1 20 8b 20 | ef 20 37 3a f1 22 45 72 |7 . . . |. 7:."Er|
|000012c0| 72 6f 72 21 20 22 3b f6 | 24 3b 22 20 61 74 20 6c |ror! ";.|$;" at l|
|000012d0| 69 6e 65 20 22 3b 9e 3a | 54 41 24 3d be 3a e7 20 |ine ";.:|TA$=.:. |
|000012e0| 54 41 24 3d 22 41 22 20 | 8c 20 e0 0d 08 3e 0b 62 |TA$="A" |. ...>.b|
|000012f0| 25 3d 62 6c 6b 25 0d 08 | 48 0e fb 20 31 32 38 20 |%=blk%..|H.. 128 |
|00001300| c8 9c 20 30 0d 08 52 2b | db 3a fb 20 36 33 20 c8 |.. 0..R+|.:. 63 .|
|00001310| 9c 20 32 35 35 3a ff 28 | 22 2a 43 41 54 20 22 2b |. 255:.(|"*CAT "+|
|00001320| 64 69 72 24 2b 22 73 63 | 72 65 65 6e 73 22 29 0d |dir$+"sc|reens").|
|00001330| 08 5c 0e fb 20 38 20 c8 | 9c 20 32 35 35 0d 08 66 |.\.. 8 .|. 255..f|
|00001340| 13 f1 27 22 50 72 65 73 | 73 20 22 3b 3a 58 3d 9c |..'"Pres|s ";:X=.|
|00001350| 0d 08 70 1d f1 20 22 31 | 2e 20 4c 6f 61 64 20 73 |..p.. "1|. Load s|
|00001360| 69 6e 67 6c 65 20 73 63 | 72 65 65 6e 22 0d 08 7a |ingle sc|reen"..z|
|00001370| 1f f1 20 8a 58 29 3b 22 | 32 2e 20 4c 6f 61 64 20 |.. .X);"|2. Load |
|00001380| 73 63 72 65 65 6e 20 66 | 69 6c 65 22 0d 08 84 21 |screen f|ile"...!|
|00001390| f1 20 8a 58 29 3b 22 33 | 2e 20 53 61 76 65 20 73 |. .X);"3|. Save s|
|000013a0| 69 6e 67 6c 65 20 73 63 | 72 65 65 6e 22 0d 08 8e |ingle sc|reen"...|
|000013b0| 1f f1 20 8a 58 29 3b 22 | 34 2e 20 53 61 76 65 20 |.. .X);"|4. Save |
|000013c0| 73 63 72 65 65 6e 20 66 | 69 6c 65 22 0d 08 98 25 |screen f|ile"...%|
|000013d0| f1 20 8a 58 29 3b 22 28 | 41 6e 79 20 6f 74 68 65 |. .X);"(|Any othe|
|000013e0| 72 20 6b 65 79 20 74 6f | 20 72 65 74 75 72 6e 29 |r key to| return)|
|000013f0| 22 0d 08 a2 0a c8 8e 20 | be 20 ca 0d 08 ac 28 20 |"...... |. ....( |
|00001400| c9 20 22 31 22 20 3a 20 | 41 24 3d 22 4c 6f 61 64 |. "1" : |A$="Load|
|00001410| 20 73 69 6e 67 6c 65 20 | 73 63 72 65 65 6e 22 3a | single |screen":|
|00001420| 58 3d 31 0d 08 b6 26 20 | c9 20 22 32 22 20 3a 20 |X=1...& |. "2" : |
|00001430| 41 24 3d 22 4c 6f 61 64 | 20 73 63 72 65 65 6e 20 |A$="Load| screen |
|00001440| 66 69 6c 65 22 3a 58 3d | 32 0d 08 c0 28 20 c9 20 |file":X=|2...( . |
|00001450| 22 33 22 20 3a 20 41 24 | 3d 22 53 61 76 65 20 73 |"3" : A$|="Save s|
|00001460| 69 6e 67 6c 65 20 73 63 | 72 65 65 6e 22 3a 58 3d |ingle sc|reen":X=|
|00001470| 33 0d 08 ca 26 20 c9 20 | 22 34 22 20 3a 20 41 24 |3...& . |"4" : A$|
|00001480| 3d 22 53 61 76 65 20 73 | 63 72 65 65 6e 20 66 69 |="Save s|creen fi|
|00001490| 6c 65 22 3a 58 3d 34 0d | 08 d4 05 7f 0d 08 de 06 |le":X=4.|........|
|000014a0| 20 e1 0d 08 e8 05 cb 0d | 08 f2 0e fb 20 36 33 3a | .......|.... 63:|
|000014b0| f1 27 27 41 24 0d 08 fc | 0e fb 20 38 20 c8 9c 20 |.''A$...|.. 8 .. |
|000014c0| 32 35 35 0d 09 06 15 e8 | 27 22 46 69 6c 65 6e 61 |255.....|'"Filena|
|000014d0| 6d 65 20 3a 20 22 73 24 | 0d 09 10 31 f4 20 49 46 |me : "s$|...1. IF|
|000014e0| 20 4c 45 46 54 24 28 73 | 24 2c 31 29 3d 22 2a 22 | LEFT$(s|$,1)="*"|
|000014f0| 20 54 48 45 4e 20 4f 53 | 43 4c 49 28 73 24 29 3a | THEN OS|CLI(s$):|
|00001500| 47 4f 54 4f 20 32 30 30 | 30 0d 09 1a 13 e7 20 73 |GOTO 200|0..... s|
|00001510| 24 3d 22 22 20 8c 20 ef | 20 37 3a e1 0d 09 24 19 |$="" . .| 7:...$.|
|00001520| e7 20 a9 73 24 3e 31 30 | 20 8c 20 73 24 3d c0 73 |. .s$>10| . s$=.s|
|00001530| 24 2c 31 30 29 0d 09 2e | 11 e7 20 58 3d 33 20 84 |$,10)...|.. X=3 .|
|00001540| 20 58 3d 34 20 8c 0d 09 | 38 1c 20 5a 3d 8e 28 64 | X=4 ...|8. Z=.(d|
|00001550| 69 72 24 2b 22 73 63 72 | 65 65 6e 73 2e 22 2b 73 |ir$+"scr|eens."+s|
|00001560| 24 29 0d 09 42 09 20 58 | 25 3d 5a 0d 09 4c 08 20 |$)..B. X|%=Z..L. |
|00001570| d9 23 5a 0d 09 56 0d 20 | e7 20 58 25 3e 30 20 8c |.#Z..V. |. X%>0 .|
|00001580| 0d 09 60 4a 20 20 fb 20 | 36 33 3a f1 27 22 46 69 |..`J . |63:.'"Fi|
|00001590| 6c 65 20 65 78 69 73 74 | 2e 22 27 22 43 6c 69 63 |le exist|."'"Clic|
|000015a0| 6b 20 6d 6f 75 73 65 20 | 74 6f 20 6f 76 65 72 77 |k mouse |to overw|
|000015b0| 72 69 74 65 2e 22 27 22 | 41 6e 79 20 6b 65 79 20 |rite."'"|Any key |
|000015c0| 74 6f 20 61 62 6f 72 74 | 2e 22 0d 09 6a 07 20 20 |to abort|."..j. |
|000015d0| f5 0d 09 74 11 20 20 20 | c8 97 20 58 25 2c 58 25 |...t. |.. X%,X%|
|000015e0| 2c 5a 0d 09 7e 0e 20 20 | 20 58 25 3d a6 28 30 29 |,Z..~. | X%=.(0)|
|000015f0| 0d 09 88 13 20 20 fd 20 | 5a 3e 30 20 84 20 58 25 |.... . |Z>0 . X%|
|00001600| 3e 2d 31 0d 09 92 0f 20 | 20 e7 20 58 25 3e 2d 31 |>-1.... | . X%>-1|
|00001610| 20 8c 0d 09 9c 08 20 20 | 20 db 0d 09 a6 3c 20 20 | ..... | ....< |
|00001620| 20 f1 27 27 22 4f 70 65 | 72 61 74 69 6f 6e 20 61 | .''"Ope|ration a|
|00001630| 62 6f 72 74 65 64 2e 20 | 43 6c 69 63 6b 20 6d 6f |borted. |Click mo|
|00001640| 75 73 65 20 6f 72 20 70 | 72 65 73 73 20 61 6e 79 |use or p|ress any|
|00001650| 20 6b 65 79 2e 22 0d 09 | b0 25 20 20 20 f5 20 c8 | key."..|.% . .|
|00001660| 97 20 58 25 2c 58 25 2c | 59 25 3a fd 20 59 25 3d |. X%,X%,|Y%:. Y%=|
|00001670| 30 20 80 20 a6 28 30 29 | 3d 2d 31 0d 09 ba 26 20 |0 . .(0)|=-1...& |
|00001680| 20 20 f5 3a c8 97 20 58 | 25 2c 58 25 2c 59 25 3a | .:.. X|%,X%,Y%:|
|00001690| fd 20 59 25 3e 30 20 84 | 20 a6 28 30 29 3c 3e 2d |. Y%>0 .| .(0)<>-|
|000016a0| 31 0d 09 c4 08 20 20 20 | e1 0d 09 ce 07 20 20 cd |1.... |..... .|
|000016b0| 0d 09 d8 06 20 cd 0d 09 | e2 05 cd 0d 09 ec 0a c8 |.... ...|........|
|000016c0| 8e 20 58 20 ca 0d 09 f6 | 3b 20 c9 20 31 20 3a 20 |. X ....|; . 1 : |
|000016d0| ff 28 22 4c 4f 41 44 20 | 22 2b 64 69 72 24 2b 22 |.("LOAD |"+dir$+"|
|000016e0| 73 63 72 65 65 6e 73 2e | 22 2b 73 24 2b 22 20 22 |screens.|"+s$+" "|
|000016f0| 2b c3 7e 28 62 6c 6b 25 | 29 29 3a f2 67 65 74 32 |+.~(blk%|)):.get2|
|00001700| 0d 0a 00 47 20 c9 20 32 | 20 3a 20 ff 28 22 4c 4f |...G . 2| : .("LO|
|00001710| 41 44 20 22 2b 64 69 72 | 24 2b 22 73 63 72 65 65 |AD "+dir|$+"scree|
|00001720| 6e 73 2e 22 2b 73 24 2b | 22 20 22 2b c3 7e 28 73 |ns."+s$+|" "+.~(s|
|00001730| 63 72 65 65 6e 73 25 29 | 29 3a 63 75 72 5f 73 63 |creens%)|):cur_sc|
|00001740| 72 65 65 6e 25 3d 31 0d | 0a 0a 21 20 f2 62 6c 6b |reen%=1.|..! .blk|
|00001750| 5f 74 6f 5f 73 63 72 28 | 63 75 72 5f 73 63 72 65 |_to_scr(|cur_scre|
|00001760| 65 6e 25 2d 31 2c 31 29 | 0d 0a 14 0a 20 f2 67 65 |en%-1,1)|.... .ge|
|00001770| 74 32 0d 0a 1e 58 20 c9 | 20 33 20 3a 20 f2 70 75 |t2...X .| 3 : .pu|
|00001780| 74 32 28 63 75 72 5f 73 | 63 72 65 65 6e 25 29 3a |t2(cur_s|creen%):|
|00001790| ff 28 22 53 41 56 45 20 | 22 2b 64 69 72 24 2b 22 |.("SAVE |"+dir$+"|
|000017a0| 73 63 72 65 65 6e 73 2e | 22 2b 73 24 2b 22 20 22 |screens.|"+s$+" "|
|000017b0| 2b c3 7e 28 62 6c 6b 25 | 29 2b 22 20 22 2b c3 7e |+.~(blk%|)+" "+.~|
|000017c0| 28 62 6c 6b 65 6e 64 25 | 29 29 0d 0a 28 5c 20 c9 |(blkend%|))..(\ .|
|000017d0| 20 34 20 3a 20 f2 70 75 | 74 32 28 63 75 72 5f 73 | 4 : .pu|t2(cur_s|
|000017e0| 63 72 65 65 6e 25 29 3a | ff 28 22 53 41 56 45 20 |creen%):|.("SAVE |
|000017f0| 22 2b 64 69 72 24 2b 22 | 73 63 72 65 65 6e 73 2e |"+dir$+"|screens.|
|00001800| 22 2b 73 24 2b 22 20 22 | 2b c3 7e 28 73 63 72 65 |"+s$+" "|+.~(scre|
|00001810| 65 6e 73 25 29 2b 22 20 | 22 2b c3 7e 28 73 63 72 |ens%)+" |"+.~(scr|
|00001820| 65 6e 64 25 29 29 0d 0a | 32 05 cb 0d 0a 3c 05 e1 |end%))..|2....<..|
|00001830| 0d 0a 46 05 3a 0d 0a 50 | 10 dd f2 63 75 72 5f 62 |..F.:..P|...cur_b|
|00001840| 6c 6b 28 64 29 0d 0a 5a | 0e ea 20 58 25 2c 59 25 |lk(d)..Z|.. X%,Y%|
|00001850| 2c 62 25 0d 0a 64 11 62 | 25 3d 62 6c 6b 25 2b 62 |,b%..d.b|%=blk%+b|
|00001860| 73 63 72 25 0d 0a 6e 10 | e3 20 59 25 3d 30 20 b8 |scr%..n.|. Y%=0 .|
|00001870| 20 61 79 25 0d 0a 78 11 | 20 e3 20 58 25 3d 30 20 | ay%..x.| . X%=0 |
|00001880| b8 20 61 78 25 0d 0a 82 | 37 20 20 e7 20 64 3d 30 |. ax%...|7 . d=0|
|00001890| 20 8c 20 63 75 72 72 65 | 6e 74 25 28 58 25 2c 59 | . curre|nt%(X%,Y|
|000018a0| 25 29 3d 3f 62 25 20 8b | 20 3f 62 25 3d 63 75 72 |%)=?b% .| ?b%=cur|
|000018b0| 72 65 6e 74 25 28 58 25 | 2c 59 25 29 0d 0a 8c 0b |rent%(X%|,Y%)....|
|000018c0| 20 20 62 25 2b 3d 31 0d | 0a 96 06 20 ed 0d 0a a0 | b%+=1.|... ....|
|000018d0| 05 ed 0d 0a aa 11 62 25 | 3d 62 6c 6b 25 2b 62 6d |......b%|=blk%+bm|
|000018e0| 73 6b 25 0d 0a b4 11 e3 | 20 59 25 3d 30 20 b8 20 |sk%.....| Y%=0 . |
|000018f0| 61 79 32 25 0d 0a be 12 | 20 e3 20 58 25 3d 30 20 |ay2%....| . X%=0 |
|00001900| b8 20 61 78 32 25 0d 0a | c8 3b 20 20 e7 20 64 3d |. ax2%..|.; . d=|
|00001910| 30 20 8c 20 73 6b 61 6c | 25 28 58 25 2c 61 79 32 |0 . skal|%(X%,ay2|
|00001920| 25 2d 59 25 29 3d 3f 62 | 25 20 8b 20 3f 62 25 3d |%-Y%)=?b|% . ?b%=|
|00001930| 73 6b 61 6c 25 28 58 25 | 2c 61 79 32 25 2d 59 25 |skal%(X%|,ay2%-Y%|
|00001940| 29 0d 0a d2 0b 20 20 62 | 25 2b 3d 31 0d 0a dc 06 |).... b|%+=1....|
|00001950| 20 ed 0d 0a e6 05 ed 0d | 0a f0 05 e1 0d 0a fa 05 | .......|........|
|00001960| 3a 0d 0b 04 27 f4 20 66 | 6c 79 74 74 65 72 20 73 |:...'. f|lytter s|
|00001970| 6b 61 6c 20 6f 70 70 20 | 69 20 76 65 6e 73 74 72 |kal opp |i venstr|
|00001980| 65 20 68 6a f8 72 6e 65 | 0d 0b 0e 10 dd f2 66 6c |e hj.rne|......fl|
|00001990| 79 74 74 5f 73 6b 61 6c | 0d 0b 18 15 73 69 7a 65 |ytt_skal|....size|
|000019a0| 78 25 3d 35 3a 73 69 7a | 65 79 25 3d 35 0d 0b 22 |x%=5:siz|ey%=5.."|
|000019b0| 05 e1 0d 0b 2c 13 ea 20 | 58 25 2c 59 25 2c 4d 58 |....,.. |X%,Y%,MX|
|000019c0| 25 2c 4d 59 25 0d 0b 36 | 15 4d 58 25 3d 61 78 32 |%,MY%..6|.MX%=ax2|
|000019d0| 25 3a 4d 59 25 3d 61 79 | 32 25 0d 0b 40 11 e3 20 |%:MY%=ay|2%..@.. |
|000019e0| 59 25 3d 30 20 b8 20 61 | 79 32 25 0d 0b 4a 12 20 |Y%=0 . a|y2%..J. |
|000019f0| e3 20 58 25 3d 30 20 b8 | 20 61 78 32 25 0d 0b 54 |. X%=0 .| ax2%..T|
|00001a00| 28 20 20 e7 20 73 6b 61 | 6c 25 28 58 25 2c 59 25 |( . ska|l%(X%,Y%|
|00001a10| 29 3e 30 20 80 20 58 25 | 3c 4d 58 25 20 8c 20 4d |)>0 . X%|<MX% . M|
|00001a20| 58 25 3d 58 25 0d 0b 5e | 06 20 ed 0d 0b 68 05 ed |X%=X%..^|. ...h..|
|00001a30| 0d 0b 72 11 e3 20 58 25 | 3d 30 20 b8 20 61 78 32 |..r.. X%|=0 . ax2|
|00001a40| 25 0d 0b 7c 12 20 e3 20 | 59 25 3d 30 20 b8 20 61 |%..|. . |Y%=0 . a|
|00001a50| 79 32 25 0d 0b 86 28 20 | 20 e7 20 73 6b 61 6c 25 |y2%...( | . skal%|
|00001a60| 28 58 25 2c 59 25 29 3e | 30 20 80 20 59 25 3c 4d |(X%,Y%)>|0 . Y%<M|
|00001a70| 59 25 20 8c 20 4d 59 25 | 3d 59 25 0d 0b 90 06 20 |Y% . MY%|=Y%.... |
|00001a80| ed 0d 0b 9a 05 ed 0d 0b | a4 19 e7 20 ac 20 28 4d |........|... . (M|
|00001a90| 58 25 3d 30 20 80 20 4d | 59 25 3d 30 29 20 8c 0d |X%=0 . M|Y%=0) ..|
|00001aa0| 0b ae 12 20 e3 20 59 25 | 3d 30 20 b8 20 61 79 32 |... . Y%|=0 . ay2|
|00001ab0| 25 0d 0b b8 13 20 20 e3 | 20 58 25 3d 30 20 b8 20 |%.... .| X%=0 . |
|00001ac0| 61 78 32 25 0d 0b c2 46 | 20 20 20 e7 20 58 25 3c |ax2%...F| . X%<|
|00001ad0| 3d 61 78 32 25 2d 4d 58 | 25 20 8c 20 73 6b 61 6c |=ax2%-MX|% . skal|
|00001ae0| 25 28 58 25 2c 59 25 29 | 3d 73 6b 61 6c 25 28 58 |%(X%,Y%)|=skal%(X|
|00001af0| 25 2b 4d 58 25 2c 59 25 | 29 20 8b 20 73 6b 61 6c |%+MX%,Y%|) . skal|
|00001b00| 25 28 58 25 2c 59 25 29 | 3d 30 0d 0b cc 07 20 20 |%(X%,Y%)|=0.... |
|00001b10| ed 0d 0b d6 06 20 ed 0d | 0b e0 12 20 e3 20 58 25 |..... ..|... . X%|
|00001b20| 3d 30 20 b8 20 61 78 32 | 25 0d 0b ea 13 20 20 e3 |=0 . ax2|%.... .|
|00001b30| 20 59 25 3d 30 20 b8 20 | 61 79 32 25 0d 0b f4 46 | Y%=0 . |ay2%...F|
|00001b40| 20 20 20 e7 20 59 25 3c | 3d 61 79 32 25 2d 4d 59 | . Y%<|=ay2%-MY|
|00001b50| 25 20 8c 20 73 6b 61 6c | 25 28 58 25 2c 59 25 29 |% . skal|%(X%,Y%)|
|00001b60| 3d 73 6b 61 6c 25 28 58 | 25 2c 59 25 2b 4d 59 25 |=skal%(X|%,Y%+MY%|
|00001b70| 29 20 8b 20 73 6b 61 6c | 25 28 58 25 2c 59 25 29 |) . skal|%(X%,Y%)|
|00001b80| 3d 30 0d 0b fe 07 20 20 | ed 0d 0c 08 06 20 ed 0d |=0.... |..... ..|
|00001b90| 0c 12 05 cd 0d 0c 1c 15 | 73 69 7a 65 78 25 3d 30 |........|sizex%=0|
|00001ba0| 3a 73 69 7a 65 79 25 3d | 30 0d 0c 26 11 e3 20 59 |:sizey%=|0..&.. Y|
|00001bb0| 25 3d 30 20 b8 20 61 79 | 32 25 0d 0c 30 12 20 e3 |%=0 . ay|2%..0. .|
|00001bc0| 20 58 25 3d 30 20 b8 20 | 61 78 32 25 0d 0c 3a 2e | X%=0 . |ax2%..:.|
|00001bd0| 20 20 e7 20 73 6b 61 6c | 25 28 58 25 2c 59 25 29 | . skal|%(X%,Y%)|
|00001be0| 3e 30 20 80 20 58 25 3e | 73 69 7a 65 78 25 20 8c |>0 . X%>|sizex% .|
|00001bf0| 20 73 69 7a 65 78 25 3d | 58 25 0d 0c 44 2e 20 20 | sizex%=|X%..D. |
|00001c00| e7 20 73 6b 61 6c 25 28 | 58 25 2c 59 25 29 3e 30 |. skal%(|X%,Y%)>0|
|00001c10| 20 80 20 59 25 3e 73 69 | 7a 65 79 25 20 8c 20 73 | . Y%>si|zey% . s|
|00001c20| 69 7a 65 79 25 3d 59 25 | 0d 0c 4e 06 20 ed 0d 0c |izey%=Y%|..N. ...|
|00001c30| 58 05 ed 0d 0c 62 08 f4 | 43 4c 53 0d 0c 6c 0e f2 |X....b..|CLS..l..|
|00001c40| 64 72 61 77 5f 73 6b 61 | 6c 0d 0c 76 05 e1 0d 0c |draw_ska|l..v....|
|00001c50| 80 05 3a 0d 0c 8a 11 dd | f2 64 72 61 77 5f 73 63 |..:.....|.draw_sc|
|00001c60| 72 65 65 6e 0d 0c 94 17 | ea 20 58 25 2c 59 25 2c |reen....|. X%,Y%,|
|00001c70| 45 25 2c 78 25 2c 79 25 | 2c 51 25 0d 0c 9e 09 eb |E%,x%,y%|,Q%.....|
|00001c80| 20 eb 3a 87 0d 0c a8 11 | e6 20 30 2c 36 33 20 c8 | .:.....|. 0,63 .|
|00001c90| 9c 20 32 35 35 0d 0c b2 | 2e c8 93 20 6e 78 25 2d |. 255...|... nx%-|
|00001ca0| 34 2c 6e 79 25 2d 34 2c | 61 78 25 2a 73 6c 25 2b |4,ny%-4,|ax%*sl%+|
|00001cb0| 73 6c 25 2b 34 2c 61 79 | 25 2a 73 68 25 2b 73 68 |sl%+4,ay|%*sh%+sh|
|00001cc0| 25 2b 34 0d 0c bc 0e e6 | 20 30 2c 30 20 c8 9c 20 |%+4.....| 0,0 .. |
|00001cd0| 30 0d 0c c6 21 c8 93 20 | c8 90 20 6e 78 25 2c 6e |0...!.. |.. nx%,n|
|00001ce0| 79 25 2c 61 78 25 2a 73 | 6c 25 2c 61 79 25 2a 73 |y%,ax%*s|l%,ay%*s|
|00001cf0| 68 25 0d 0c d0 10 e3 20 | 59 25 3d 30 20 b8 20 61 |h%..... |Y%=0 . a|
|00001d00| 79 25 0d 0c da 11 20 e3 | 20 58 25 3d 30 20 b8 20 |y%.... .| X%=0 . |
|00001d10| 61 78 25 0d 0c e4 18 20 | 20 45 25 3d 63 75 72 72 |ax%.... | E%=curr|
|00001d20| 65 6e 74 25 28 58 25 2c | 59 25 29 0d 0c ee 14 20 |ent%(X%,|Y%).... |
|00001d30| 20 f2 70 75 74 28 58 25 | 2c 59 25 2c 45 25 29 0d | .put(X%|,Y%,E%).|
|00001d40| 0c f8 06 20 ed 0d 0d 02 | 05 ed 0d 0d 0c 11 e6 20 |... ....|....... |
|00001d50| 30 2c 36 33 20 c8 9c 20 | 32 35 35 0d 0d 16 36 c8 |0,63 .. |255...6.|
|00001d60| 93 20 73 68 6f 77 78 25 | 2d 34 2c 73 68 6f 77 79 |. showx%|-4,showy|
|00001d70| 25 2d 34 2c 61 78 32 25 | 2a 73 6c 25 2b 73 6c 25 |%-4,ax2%|*sl%+sl%|
|00001d80| 2b 34 2c 61 79 32 25 2a | 73 68 25 2b 73 68 25 2b |+4,ay2%*|sh%+sh%+|
|00001d90| 34 0d 0d 20 0e e6 20 30 | 2c 30 20 c8 9c 20 30 0d |4.. .. 0|,0 .. 0.|
|00001da0| 0d 2a 29 c8 93 20 c8 90 | 20 73 68 6f 77 78 25 2c |.*).. ..| showx%,|
|00001db0| 73 68 6f 77 79 25 2c 61 | 78 32 25 2a 73 6c 25 2c |showy%,a|x2%*sl%,|
|00001dc0| 61 79 32 25 2a 73 68 25 | 0d 0d 34 0f fb 20 36 33 |ay2%*sh%|..4.. 63|
|00001dd0| 20 c8 9c 20 32 35 35 0d | 0d 3e 39 fb 20 36 33 20 | .. 255.|.>9. 63 |
|00001de0| c8 9c 20 32 35 35 3a f1 | 8a 31 30 2c 32 35 29 3b |.. 255:.|.10,25);|
|00001df0| 22 46 31 2d 44 69 73 63 | 20 46 32 2d 47 65 74 20 |"F1-Disc| F2-Get |
|00001e00| 46 33 2d 50 75 74 20 46 | 38 2d 43 6c 65 61 72 22 |F3-Put F|8-Clear"|
|00001e10| 0d 0d 48 2b f1 8a 74 69 | 6d 65 78 25 2c 74 69 6d |..H+..ti|mex%,tim|
|00001e20| 65 79 25 2d 32 29 3b 22 | 4c 65 76 65 6c 20 22 3b |ey%-2);"|Level ";|
|00001e30| 63 75 72 5f 73 63 72 65 | 65 6e 25 0d 0d 52 0e f2 |cur_scre|en%..R..|
|00001e40| 64 72 61 77 5f 73 6b 61 | 6c 0d 0d 5c 0f f2 73 68 |draw_ska|l..\..sh|
|00001e50| 6f 77 5f 61 74 6f 6d 73 | 0d 0d 66 0e f2 73 68 6f |ow_atoms|..f..sho|
|00001e60| 77 5f 76 65 67 67 0d 0d | 70 0c f2 73 68 6f 77 5f |w_vegg..|p..show_|
|00001e70| 62 67 0d 0d 7a 0f f2 70 | 72 69 6e 74 5f 74 69 6d |bg..z..p|rint_tim|
|00001e80| 65 0d 0d 84 0d f2 70 72 | 69 6e 74 5f 6f 6e 0d 0d |e.....pr|int_on..|
|00001e90| 8e 0f f2 70 72 69 6e 74 | 5f 6e 61 6d 65 0d 0d 98 |...print|_name...|
|00001ea0| 0c 2a 50 4f 49 4e 54 45 | 52 0d 0d a2 05 e1 0d 0d |.*POINTE|R.......|
|00001eb0| ac 05 3a 0d 0d b6 11 dd | f2 64 72 61 77 5f 73 63 |..:.....|.draw_sc|
|00001ec0| 72 61 74 6f 0d 0d c0 0e | ea 20 58 25 2c 59 25 2c |rato....|. X%,Y%,|
|00001ed0| 45 25 0d 0d ca 10 e3 20 | 59 25 3d 30 20 b8 20 61 |E%..... |Y%=0 . a|
|00001ee0| 79 25 0d 0d d4 11 20 e3 | 20 58 25 3d 30 20 b8 20 |y%.... .| X%=0 . |
|00001ef0| 61 78 25 0d 0d de 18 20 | 20 45 25 3d 63 75 72 72 |ax%.... | E%=curr|
|00001f00| 65 6e 74 25 28 58 25 2c | 59 25 29 0d 0d e8 1e 20 |ent%(X%,|Y%).... |
|00001f10| 20 e7 20 45 25 3e 39 39 | 20 8c 20 f2 70 75 74 28 | . E%>99| . .put(|
|00001f20| 58 25 2c 59 25 2c 45 25 | 29 0d 0d f2 06 20 ed 0d |X%,Y%,E%|).... ..|
|00001f30| 0d fc 05 ed 0d 0e 06 0e | f2 64 72 61 77 5f 73 6b |........|.draw_sk|
|00001f40| 61 6c 0d 0e 10 05 e1 0d | 0e 1a 05 3a 0d 0e 24 0f |al......|...:..$.|
|00001f50| dd f2 64 72 61 77 5f 73 | 6b 61 6c 0d 0e 2e 0e e6 |..draw_s|kal.....|
|00001f60| 20 30 2c 30 20 c8 9c 20 | 30 0d 0e 38 35 c8 93 20 | 0,0 .. |0..85.. |
|00001f70| c8 90 20 73 68 6f 77 78 | 25 2c 73 68 6f 77 79 25 |.. showx|%,showy%|
|00001f80| 2c 28 61 78 32 25 2b 31 | 29 2a 73 6c 25 2d 34 2c |,(ax2%+1|)*sl%-4,|
|00001f90| 28 61 79 32 25 2b 31 29 | 2a 73 68 25 2d 34 0d 0e |(ay2%+1)|*sh%-4..|
|00001fa0| 42 11 e3 20 59 25 3d 30 | 20 b8 20 61 79 32 25 0d |B.. Y%=0| . ay2%.|
|00001fb0| 0e 4c 12 20 e3 20 58 25 | 3d 30 20 b8 20 61 78 32 |.L. . X%|=0 . ax2|
|00001fc0| 25 0d 0e 56 15 20 20 45 | 25 3d 73 6b 61 6c 25 28 |%..V. E|%=skal%(|
|00001fd0| 58 25 2c 59 25 29 0d 0e | 60 4f 20 20 e7 20 45 25 |X%,Y%)..|`O . E%|
|00001fe0| 3e 39 39 20 8c 20 c8 99 | 20 53 70 72 4f 70 25 2c |>99 . ..| SprOp%,|
|00001ff0| 32 35 36 2b 33 34 2c 41 | 74 6f 6d 53 70 72 25 2c |256+34,A|tomSpr%,|
|00002000| c3 28 45 25 2d 31 30 30 | 29 2c 73 68 6f 77 78 25 |.(E%-100|),showx%|
|00002010| 2b 58 25 2a 73 6c 25 2c | 73 68 6f 77 79 25 2b 59 |+X%*sl%,|showy%+Y|
|00002020| 25 2a 73 68 25 0d 0e 6a | 06 20 ed 0d 0e 74 05 ed |%*sh%..j|. ...t..|
|00002030| 0d 0e 7e 05 e1 0d 0e 88 | 05 3a 0d 0e 92 10 dd f2 |..~.....|.:......|
|00002040| 64 72 61 77 5f 73 63 72 | 62 67 0d 0e 9c 0e ea 20 |draw_scr|bg..... |
|00002050| 58 25 2c 59 25 2c 45 25 | 0d 0e a6 10 e3 20 59 25 |X%,Y%,E%|..... Y%|
|00002060| 3d 30 20 b8 20 61 79 25 | 0d 0e b0 11 20 e3 20 58 |=0 . ay%|.... . X|
|00002070| 25 3d 30 20 b8 20 61 78 | 25 0d 0e ba 18 20 20 45 |%=0 . ax|%.... E|
|00002080| 25 3d 63 75 72 72 65 6e | 74 25 28 58 25 2c 59 25 |%=curren|t%(X%,Y%|
|00002090| 29 0d 0e c4 1d 20 20 e7 | 20 45 25 3d 30 20 8c 20 |).... .| E%=0 . |
|000020a0| f2 70 75 74 28 58 25 2c | 59 25 2c 45 25 29 0d 0e |.put(X%,|Y%,E%)..|
|000020b0| ce 06 20 ed 0d 0e d8 05 | ed 0d 0e e2 05 e1 0d 0e |.. .....|........|
|000020c0| ec 05 3a 0d 0e f6 10 dd | f2 73 68 6f 77 5f 61 74 |..:.....|.show_at|
|000020d0| 6f 6d 73 0d 0f 00 0f ea | 20 51 25 2c 51 32 25 2c |oms.....| Q%,Q2%,|
|000020e0| 41 25 0d 0f 0a 16 e3 20 | 51 25 3d 30 20 b8 20 6d |A%..... |Q%=0 . m|
|000020f0| 61 78 5f 61 74 6f 6d 25 | 0d 0f 14 2d 20 c8 99 20 |ax_atom%|...- .. |
|00002100| 53 70 72 4f 70 25 2c 32 | 35 36 2b 33 34 2c 41 74 |SprOp%,2|56+34,At|
|00002110| 6f 6d 53 70 72 25 2c c3 | 28 51 25 29 2c 51 25 2a |omSpr%,.|(Q%),Q%*|
|00002120| 73 6c 25 2c 30 0d 0f 1e | 05 ed 0d 0f 28 0a f2 63 |sl%,0...|....(..c|
|00002130| 75 72 61 74 0d 0f 32 05 | e1 0d 0f 3c 05 3a 0d 0f |urat..2.|...<.:..|
|00002140| 46 0b dd f2 63 75 72 61 | 74 0d 0f 50 11 e6 20 33 |F...cura|t..P.. 3|
|00002150| 2c 36 33 20 c8 9c 20 32 | 35 35 0d 0f 5a 20 c8 93 |,63 .. 2|55..Z ..|
|00002160| 20 63 75 72 5f 61 74 25 | 2a 73 6c 25 2c 73 6c 25 | cur_at%|*sl%,sl%|
|00002170| 2b 34 2c 73 6c 25 2d 34 | 2c 34 0d 0f 64 05 e1 0d |+4,sl%-4|,4..d...|
|00002180| 0f 6e 05 3a 0d 0f 78 0a | dd f2 6d 61 69 6e 0d 0f |.n.:..x.|..main..|
|00002190| 82 0b ea 20 65 78 69 74 | 25 0d 0f 8c 07 ea 20 85 |... exit|%..... .|
|000021a0| 0d 0f 96 4a ee 20 85 20 | ea 20 e7 20 9f 3d 31 37 |...J. . |. . .=17|
|000021b0| 20 8c 20 e1 20 8b 20 ef | 20 37 3a f1 22 45 72 72 | . . . .| 7:."Err|
|000021c0| 6f 72 21 20 22 3b f6 24 | 3b 22 20 61 74 20 6c 69 |or! ";.$|;" at li|
|000021d0| 6e 65 20 22 3b 9e 3a 54 | 41 24 3d be 3a e7 20 54 |ne ";.:T|A$=.:. T|
|000021e0| 41 24 3d 22 41 22 20 8c | 20 e0 0d 0f a0 0b 65 78 |A$="A" .| .....ex|
|000021f0| 69 74 25 3d a3 0d 0f aa | 05 f5 0d 0f b4 0a 20 f2 |it%=....|...... .|
|00002200| 70 6f 6c 6c 0d 0f be 0b | fd 20 65 78 69 74 25 0d |poll....|. exit%.|
|00002210| 0f c8 05 e1 0d 0f d2 05 | 3a 0d 0f dc 0a dd f2 70 |........|:......p|
|00002220| 6f 6c 6c 0d 0f e6 13 ea | 20 58 25 2c 59 25 2c 5a |oll.....| X%,Y%,Z|
|00002230| 25 2c 6f 75 74 25 0d 0f | f0 0a 6f 75 74 25 3d a3 |%,out%..|..out%=.|
|00002240| 0d 0f fa 0c 54 41 24 3d | bf 28 30 29 0d 10 04 0c |....TA$=|.(0)....|
|00002250| c8 8e 20 54 41 24 20 ca | 0d 10 0e 20 20 c9 20 22 |.. TA$ .|... . "|
|00002260| 44 22 2c 22 64 22 20 3a | 20 f2 64 69 73 63 5f 6f |D","d" :| .disc_o|
|00002270| 70 3a 6f 75 74 25 3d b9 | 0d 10 18 23 20 c9 20 22 |p:out%=.|...# . "|
|00002280| 50 22 2c 22 70 22 20 3a | 20 f2 70 75 74 5f 73 63 |P","p" :| .put_sc|
|00002290| 72 65 65 6e 3a 6f 75 74 | 25 3d b9 0d 10 22 23 20 |reen:out|%=..."# |
|000022a0| c9 20 22 47 22 2c 22 67 | 22 20 3a 20 f2 67 65 74 |. "G","g|" : .get|
|000022b0| 5f 73 63 72 65 65 6e 3a | 6f 75 74 25 3d b9 0d 10 |_screen:|out%=...|
|000022c0| 2c 1d 20 c9 20 22 2b 22 | 20 3a 20 f2 6e 65 78 74 |,. . "+"| : .next|
|000022d0| 5f 73 63 72 3a 6f 75 74 | 25 3d b9 0d 10 36 1d 20 |_scr:out|%=...6. |
|000022e0| c9 20 22 2d 22 20 3a 20 | f2 70 72 65 76 5f 73 63 |. "-" : |.prev_sc|
|000022f0| 72 3a 6f 75 74 25 3d b9 | 0d 10 40 16 20 c9 20 bd |r:out%=.|..@. . .|
|00002300| 28 31 32 38 29 20 3a 20 | f2 62 6c 61 6e 6b 0d 10 |(128) : |.blank..|
|00002310| 4a 05 cb 0d 10 54 1d e7 | 20 6f 75 74 25 3d b9 20 |J....T..| out%=. |
|00002320| 8c 20 f2 64 72 61 77 5f | 73 63 72 65 65 6e 3a e1 |. .draw_|screen:.|
|00002330| 0d 10 5e 0f c8 97 20 58 | 25 2c 59 25 2c 5a 25 0d |..^... X|%,Y%,Z%.|
|00002340| 10 68 0e e7 20 5a 25 3d | 30 20 8c 20 e1 0d 10 72 |.h.. Z%=|0 . ...r|
|00002350| 20 e7 20 a4 6f 6e 5f 73 | 63 72 65 65 6e 28 58 25 | . .on_s|creen(X%|
|00002360| 2c 59 25 2c 5a 25 29 3d | 30 20 8c 20 e1 0d 10 7c |,Y%,Z%)=|0 . ...||
|00002370| 1e e7 20 a4 6f 6e 5f 73 | 63 72 32 28 58 25 2c 59 |.. .on_s|cr2(X%,Y|
|00002380| 25 2c 5a 25 29 3d 30 20 | 8c 20 e1 0d 10 86 0e f2 |%,Z%)=0 |. ......|
|00002390| 76 65 6c 67 5f 76 65 67 | 67 0d 10 90 0c f2 76 65 |velg_veg|g.....ve|
|000023a0| 6c 67 5f 62 67 0d 10 9a | 0f f2 65 6e 64 72 65 5f |lg_bg...|..endre_|
|000023b0| 74 69 6d 65 0d 10 a4 0f | f2 65 6e 64 72 65 5f 6e |time....|.endre_n|
|000023c0| 61 6d 65 0d 10 ae 0d f2 | 65 6e 64 72 65 5f 6f 6e |ame.....|endre_on|
|000023d0| 0d 10 b8 0e f2 65 6e 64 | 72 65 5f 62 6f 6e 0d 10 |.....end|re_bon..|
|000023e0| c2 0e e7 20 59 25 3c 73 | 68 25 20 8c 0d 10 cc 0b |... Y%<s|h% .....|
|000023f0| 20 f2 63 75 72 61 74 0d | 10 d6 15 20 63 75 72 5f | .curat.|... cur_|
|00002400| 61 74 25 3d 58 25 20 81 | 20 73 6c 25 0d 10 e0 0b |at%=X% .| sl%....|
|00002410| 20 f2 63 75 72 61 74 0d | 10 ea 21 20 e7 20 5a 25 | .curat.|..! . Z%|
|00002420| 3d 32 20 8c 20 f2 65 64 | 69 74 5f 61 74 6f 6d 28 |=2 . .ed|it_atom(|
|00002430| 63 75 72 5f 61 74 25 29 | 0d 10 f4 05 cd 0d 10 fe |cur_at%)|........|
|00002440| 05 e1 0d 11 08 05 3a 0d | 11 12 0b dd f2 62 6c 61 |......:.|.....bla|
|00002450| 6e 6b 0d 11 1c 0b ea 20 | 41 2c 41 2c 42 0d 11 26 |nk..... |A,A,B..&|
|00002460| 0c c8 97 20 41 2c 41 2c | 42 0d 11 30 0d e7 20 42 |... A,A,|B..0.. B|
|00002470| 3d 30 20 8c 20 e1 0d 11 | 3a 1c f2 63 6c 65 61 72 |=0 . ...|:..clear|
|00002480| 5f 66 69 6c 65 3a f2 67 | 65 74 32 3a 6f 75 74 25 |_file:.g|et2:out%|
|00002490| 3d b9 0d 11 44 05 e1 0d | 11 4e 05 3a 0d 11 58 0e |=...D...|.N.:..X.|
|000024a0| dd f2 6e 65 78 74 5f 73 | 63 72 0d 11 62 33 e7 20 |..next_s|cr..b3. |
|000024b0| 63 75 72 5f 73 63 72 65 | 65 6e 25 3c 61 6e 74 5f |cur_scre|en%<ant_|
|000024c0| 73 63 72 65 65 6e 73 25 | 20 8c 20 63 75 72 5f 73 |screens%| . cur_s|
|000024d0| 63 72 65 65 6e 25 2b 3d | 31 20 8b 20 e1 0d 11 6c |creen%+=|1 . ...l|
|000024e0| 20 f2 62 6c 6b 5f 74 6f | 5f 73 63 72 28 63 75 72 | .blk_to|_scr(cur|
|000024f0| 5f 73 63 72 65 65 6e 25 | 2d 31 2c 31 29 0d 11 76 |_screen%|-1,1)..v|
|00002500| 09 f2 67 65 74 32 0d 11 | 80 05 e1 0d 11 8a 05 3a |..get2..|.......:|
|00002510| 0d 11 94 0e dd f2 70 72 | 65 76 5f 73 63 72 0d 11 |......pr|ev_scr..|
|00002520| 9e 28 e7 20 63 75 72 5f | 73 63 72 65 65 6e 25 3e |.(. cur_|screen%>|
|00002530| 31 20 8c 20 63 75 72 5f | 73 63 72 65 65 6e 25 2d |1 . cur_|screen%-|
|00002540| 3d 31 20 8b 20 e1 0d 11 | a8 20 f2 62 6c 6b 5f 74 |=1 . ...|. .blk_t|
|00002550| 6f 5f 73 63 72 28 63 75 | 72 5f 73 63 72 65 65 6e |o_scr(cu|r_screen|
|00002560| 25 2d 31 2c 31 29 0d 11 | b2 09 f2 67 65 74 32 0d |%-1,1)..|...get2.|
|00002570| 11 bc 05 e1 0d 11 c6 05 | 3a 0d 11 d0 10 dd f2 70 |........|:......p|
|00002580| 75 74 5f 73 63 72 65 65 | 6e 0d 11 da 07 ea 20 41 |ut_scree|n..... A|
|00002590| 0d 11 e4 07 ea 20 85 0d | 11 ee 4a ee 20 85 20 ea |..... ..|..J. . .|
|000025a0| 20 e7 20 9f 3d 31 37 20 | 8c 20 e1 20 8b 20 ef 20 | . .=17 |. . . . |
|000025b0| 37 3a f1 22 45 72 72 6f | 72 21 20 22 3b f6 24 3b |7:."Erro|r! ";.$;|
|000025c0| 22 20 61 74 20 6c 69 6e | 65 20 22 3b 9e 3a 54 41 |" at lin|e ";.:TA|
|000025d0| 24 3d be 3a e7 20 54 41 | 24 3d 22 41 22 20 8c 20 |$=.:. TA|$="A" . |
|000025e0| e0 0d 11 f8 05 db 0d 12 | 02 0c fb 20 34 34 2c 32 |........|... 44,2|
|000025f0| 35 35 0d 12 0c 45 f1 20 | 22 50 75 74 20 73 63 72 |55...E. |"Put scr|
|00002600| 65 65 6e 20 61 73 20 28 | 31 2d 22 3b 61 6e 74 5f |een as (|1-";ant_|
|00002610| 73 63 72 65 65 6e 73 25 | 3b 22 29 20 44 65 66 61 |screens%|;") Defa|
|00002620| 75 6c 74 3d 22 3b 63 75 | 72 5f 73 63 72 65 65 6e |ult=";cu|r_screen|
|00002630| 25 3b 22 20 3a 22 3b 0d | 12 16 09 e8 20 22 22 41 |%;" :";.|.... ""A|
|00002640| 0d 12 20 19 e7 20 41 3d | 30 20 8c 20 41 3d 63 75 |.. .. A=|0 . A=cu|
|00002650| 72 5f 73 63 72 65 65 6e | 25 0d 12 2a 0c f2 70 75 |r_screen|%..*..pu|
|00002660| 74 32 28 41 29 0d 12 34 | 05 e1 0d 12 3e 05 3a 0d |t2(A)..4|....>.:.|
|00002670| 12 48 0d dd f2 70 75 74 | 32 28 41 29 0d 12 52 09 |.H...put|2(A)..R.|
|00002680| ea 20 6d 6e 24 0d 12 5c | 0f f2 66 6c 79 74 74 5f |. mn$..\|..flytt_|
|00002690| 73 6b 61 6c 0d 12 66 0f | f2 63 75 72 5f 62 6c 6b |skal..f.|.cur_blk|
|000026a0| 28 31 29 0d 12 70 12 62 | 6c 6b 25 3f 31 35 36 3d |(1)..p.b|lk%?156=|
|000026b0| 74 69 6d 65 25 0d 12 7a | 14 62 6c 6b 25 3f 31 35 |time%..z|.blk%?15|
|000026c0| 37 3d 63 75 72 5f 62 67 | 25 0d 12 84 13 62 6c 6b |7=cur_bg|%....blk|
|000026d0| 25 3f 31 35 38 3d 73 69 | 7a 65 78 25 0d 12 8e 13 |%?158=si|zex%....|
|000026e0| 62 6c 6b 25 3f 31 35 39 | 3d 73 69 7a 65 79 25 0d |blk%?159|=sizey%.|
|000026f0| 12 98 15 62 6c 6b 25 3f | 64 69 76 69 6e 66 6f 25 |...blk%?|divinfo%|
|00002700| 3d 6f 6e 25 0d 12 a2 1b | 3f 28 62 6c 6b 25 2b 64 |=on%....|?(blk%+d|
|00002710| 69 76 69 6e 66 6f 25 2b | 31 29 3d 62 6f 6e 25 0d |ivinfo%+|1)=bon%.|
|00002720| 12 ac 29 6d 6e 24 3d 6d | 6f 6c 6e 61 6d 65 24 3a |..)mn$=m|olname$:|
|00002730| e7 20 a9 6d 6e 24 3e 31 | 36 20 8c 20 6d 6e 24 3d |. .mn$>1|6 . mn$=|
|00002740| c0 6d 6e 24 2c 31 36 29 | 0d 12 b6 1a 24 28 62 6c |.mn$,16)|....$(bl|
|00002750| 6b 25 2b 64 69 76 69 6e | 66 6f 25 2b 32 29 3d 6d |k%+divin|fo%+2)=m|
|00002760| 6e 24 0d 12 c0 16 f2 62 | 6c 6b 5f 74 6f 5f 73 63 |n$.....b|lk_to_sc|
|00002770| 72 28 41 2d 31 2c 30 29 | 0d 12 ca 05 e1 0d 12 d4 |r(A-1,0)|........|
|00002780| 05 3a 0d 12 de 10 dd f2 | 67 65 74 5f 73 63 72 65 |.:......|get_scre|
|00002790| 65 6e 0d 12 e8 07 ea 20 | 41 0d 12 f2 07 ea 20 85 |en..... |A..... .|
|000027a0| 0d 12 fc 4a ee 20 85 20 | ea 20 e7 20 9f 3d 31 37 |...J. . |. . .=17|
|000027b0| 20 8c 20 e1 20 8b 20 ef | 20 37 3a f1 22 45 72 72 | . . . .| 7:."Err|
|000027c0| 6f 72 21 20 22 3b f6 24 | 3b 22 20 61 74 20 6c 69 |or! ";.$|;" at li|
|000027d0| 6e 65 20 22 3b 9e 3a 54 | 41 24 3d be 3a e7 20 54 |ne ";.:T|A$=.:. T|
|000027e0| 41 24 3d 22 41 22 20 8c | 20 e0 0d 13 06 05 db 0d |A$="A" .| .......|
|000027f0| 13 10 16 f2 70 75 74 32 | 28 63 75 72 5f 73 63 72 |....put2|(cur_scr|
|00002800| 65 65 6e 25 29 0d 13 1a | 0c fb 20 34 34 2c 32 35 |een%)...|.. 44,25|
|00002810| 35 0d 13 24 2a f1 20 22 | 47 65 74 20 73 63 72 65 |5..$*. "|Get scre|
|00002820| 65 6e 20 28 31 2d 22 3b | 61 6e 74 5f 73 63 72 65 |en (1-";|ant_scre|
|00002830| 65 6e 73 25 3b 22 29 20 | 3a 22 3b 0d 13 2e 09 e8 |ens%;") |:";.....|
|00002840| 20 22 22 41 0d 13 38 0b | e7 20 41 3d 30 20 e1 0d | ""A..8.|. A=0 ..|
|00002850| 13 42 11 63 75 72 5f 73 | 63 72 65 65 6e 25 3d 41 |.B.cur_s|creen%=A|
|00002860| 0d 13 4c 16 f2 62 6c 6b | 5f 74 6f 5f 73 63 72 28 |..L..blk|_to_scr(|
|00002870| 41 2d 31 2c 31 29 0d 13 | 56 09 f2 67 65 74 32 0d |A-1,1)..|V..get2.|
|00002880| 13 60 05 e1 0d 13 6a 05 | 3a 0d 13 74 0a dd f2 67 |.`....j.|:..t...g|
|00002890| 65 74 32 0d 13 7e 0f f2 | 63 75 72 5f 62 6c 6b 28 |et2..~..|cur_blk(|
|000028a0| 30 29 0d 13 88 24 e3 20 | 51 25 3d 30 20 b8 20 31 |0)...$. |Q%=0 . 1|
|000028b0| 39 3a f2 6d 61 6b 65 5f | 6f 6e 65 5f 61 74 6f 6d |9:.make_|one_atom|
|000028c0| 28 51 25 29 3a ed 0d 13 | 92 12 74 69 6d 65 25 3d |(Q%):...|..time%=|
|000028d0| 62 6c 6b 25 3f 31 35 36 | 0d 13 9c 14 63 75 72 5f |blk%?156|....cur_|
|000028e0| 62 67 25 3d 62 6c 6b 25 | 3f 31 35 37 0d 13 a6 13 |bg%=blk%|?157....|
|000028f0| 73 69 7a 65 78 25 3d 62 | 6c 6b 25 3f 31 35 38 0d |sizex%=b|lk%?158.|
|00002900| 13 b0 13 73 69 7a 65 79 | 25 3d 62 6c 6b 25 3f 31 |...sizey|%=blk%?1|
|00002910| 35 39 0d 13 ba 15 6f 6e | 25 3d 62 6c 6b 25 3f 64 |59....on|%=blk%?d|
|00002920| 69 76 69 6e 66 6f 25 0d | 13 c4 1b 62 6f 6e 25 3d |ivinfo%.|...bon%=|
|00002930| 3f 28 62 6c 6b 25 2b 64 | 69 76 69 6e 66 6f 25 2b |?(blk%+d|ivinfo%+|
|00002940| 31 29 0d 13 ce 23 6d 6f | 6c 6e 61 6d 65 24 3d a4 |1)...#mo|lname$=.|
|00002950| 6e 75 6c 6c 28 62 6c 6b | 25 2b 64 69 76 69 6e 66 |null(blk|%+divinf|
|00002960| 6f 25 2b 32 29 0d 13 d8 | 05 e1 0d 13 e2 05 3a 0d |o%+2)...|......:.|
|00002970| 13 ec 10 dd a4 6e 75 6c | 6c 28 61 64 72 25 29 0d |.....nul|l(adr%).|
|00002980| 13 f6 0b ea 20 41 24 2c | 51 25 0d 14 00 0e 41 24 |.... A$,|Q%....A$|
|00002990| 3d 22 22 3a 51 25 3d 30 | 0d 14 0a 11 c8 95 20 61 |="":Q%=0|...... a|
|000029a0| 64 72 25 3f 51 25 3e 33 | 31 0d 14 14 15 20 41 24 |dr%?Q%>3|1.... A$|
|000029b0| 3d 41 24 2b bd 28 61 64 | 72 25 3f 51 25 29 0d 14 |=A$+.(ad|r%?Q%)..|
|000029c0| 1e 0a 20 51 25 2b 3d 31 | 0d 14 28 05 ce 0d 14 32 |.. Q%+=1|..(....2|
|000029d0| 07 3d 41 24 0d 14 3c 05 | 3a 0d 14 46 19 dd a4 6f |.=A$..<.|:..F...o|
|000029e0| 6e 5f 73 63 72 65 65 6e | 28 58 25 2c 59 25 2c 5a |n_screen|(X%,Y%,Z|
|000029f0| 25 29 0d 14 50 09 ea 20 | 45 4c 25 0d 14 5a 1b e7 |%)..P.. |EL%..Z..|
|00002a00| 20 58 25 3c 6e 78 25 20 | 84 20 59 25 3c 6e 79 25 | X%<nx% |. Y%<ny%|
|00002a10| 20 8c 20 3d 2d 31 0d 14 | 64 37 e7 20 58 25 3e 6e | . =-1..|d7. X%>n|
|00002a20| 78 25 2b 28 61 78 25 2b | 31 29 2a 73 6c 25 2d 34 |x%+(ax%+|1)*sl%-4|
|00002a30| 20 84 20 59 25 3e 6e 79 | 25 2b 28 61 79 25 2b 31 | . Y%>ny|%+(ay%+1|
|00002a40| 29 2a 73 68 25 2d 34 20 | 8c 20 3d 2d 31 0d 14 6e |)*sh%-4 |. =-1..n|
|00002a50| 0b c8 8e 20 5a 25 20 ca | 0d 14 78 1a 20 c9 20 34 |... Z% .|..x. . 4|
|00002a60| 20 3a 20 45 4c 25 3d 63 | 75 72 5f 61 74 25 2b 31 | : EL%=c|ur_at%+1|
|00002a70| 30 30 0d 14 82 18 20 c9 | 20 32 20 3a 20 45 4c 25 |00.... .| 2 : EL%|
|00002a80| 3d 63 75 72 5f 65 6c 25 | 2b 31 0d 14 8c 10 20 c9 |=cur_el%|+1.... .|
|00002a90| 20 31 20 3a 20 45 4c 25 | 3d 31 0d 14 96 05 cb 0d | 1 : EL%|=1......|
|00002aa0| 14 a0 11 e7 20 a6 2d 31 | 20 8c 20 45 4c 25 3d 30 |.... .-1| . EL%=0|
|00002ab0| 0d 14 aa 2f f2 70 75 74 | 28 28 28 58 25 2d 6e 78 |.../.put|(((X%-nx|
|00002ac0| 25 29 20 81 20 73 6c 25 | 29 2c 28 28 59 25 2d 6e |%) . sl%|),((Y%-n|
|00002ad0| 79 25 29 20 81 20 73 68 | 25 29 2c 45 4c 25 29 0d |y%) . sh|%),EL%).|
|00002ae0| 14 b4 06 3d 30 0d 14 be | 05 3a 0d 14 c8 17 dd a4 |...=0...|.:......|
|00002af0| 6f 6e 5f 73 63 72 32 28 | 58 25 2c 59 25 2c 5a 25 |on_scr2(|X%,Y%,Z%|
|00002b00| 29 0d 14 d2 0f ea 20 45 | 4c 25 2c 78 25 2c 79 25 |)..... E|L%,x%,y%|
|00002b10| 0d 14 dc 0e e7 20 5a 25 | 3d 30 20 8c 20 e1 0d 14 |..... Z%|=0 . ...|
|00002b20| e6 30 e7 20 58 25 3c 73 | 68 6f 77 78 25 20 84 20 |.0. X%<s|howx% . |
|00002b30| 58 25 3e 73 68 6f 77 78 | 25 2b 28 61 78 32 25 2b |X%>showx|%+(ax2%+|
|00002b40| 31 29 2a 73 6c 25 2d 34 | 20 8c 20 3d 2d 31 0d 14 |1)*sl%-4| . =-1..|
|00002b50| f0 30 e7 20 59 25 3c 73 | 68 6f 77 79 25 20 84 20 |.0. Y%<s|howy% . |
|00002b60| 59 25 3e 73 68 6f 77 79 | 25 2b 28 61 79 32 25 2b |Y%>showy|%+(ay2%+|
|00002b70| 31 29 2a 73 68 25 2d 34 | 20 8c 20 3d 2d 31 0d 14 |1)*sh%-4| . =-1..|
|00002b80| fa 0b c8 8e 20 5a 25 20 | ca 0d 15 04 16 20 c9 20 |.... Z% |..... . |
|00002b90| 34 20 3a 20 45 4c 25 3d | 63 75 72 5f 61 74 25 0d |4 : EL%=|cur_at%.|
|00002ba0| 15 0e 13 20 c9 20 31 2c | 32 20 3a 20 45 4c 25 3d |... . 1,|2 : EL%=|
|00002bb0| 2d 31 0d 15 18 05 cb 0d | 15 22 18 78 25 3d 28 58 |-1......|.".x%=(X|
|00002bc0| 25 2d 73 68 6f 77 78 25 | 29 20 81 20 73 6c 25 0d |%-showx%|) . sl%.|
|00002bd0| 15 2c 18 79 25 3d 28 59 | 25 2d 73 68 6f 77 79 25 |.,.y%=(Y|%-showy%|
|00002be0| 29 20 81 20 73 68 25 0d | 15 36 60 e7 20 45 4c 25 |) . sh%.|.6`. EL%|
|00002bf0| 3e 3d 30 20 c8 99 20 53 | 70 72 4f 70 25 2c 32 35 |>=0 .. S|prOp%,25|
|00002c00| 36 2b 33 34 2c 41 74 6f | 6d 53 70 72 25 2c c3 28 |6+34,Ato|mSpr%,.(|
|00002c10| 45 4c 25 29 2c 73 68 6f | 77 78 25 2b 78 25 2a 73 |EL%),sho|wx%+x%*s|
|00002c20| 6c 25 2c 73 68 6f 77 79 | 25 2b 79 25 2a 73 68 25 |l%,showy|%+y%*sh%|
|00002c30| 2c 30 3a 73 6b 61 6c 25 | 28 78 25 2c 79 25 29 3d |,0:skal%|(x%,y%)=|
|00002c40| 45 4c 25 2b 31 30 30 0d | 15 40 58 e7 20 45 4c 25 |EL%+100.|.@X. EL%|
|00002c50| 3d 2d 31 20 c8 99 20 53 | 70 72 4f 70 25 2c 32 35 |=-1 .. S|prOp%,25|
|00002c60| 36 2b 33 34 2c 73 70 72 | 69 74 65 73 25 2c 22 62 |6+34,spr|ites%,"b|
|00002c70| 30 22 2c 73 68 6f 77 78 | 25 2b 78 25 2a 73 6c 25 |0",showx|%+x%*sl%|
|00002c80| 2c 73 68 6f 77 79 25 2b | 79 25 2a 73 68 25 2c 30 |,showy%+|y%*sh%,0|
|00002c90| 3a 73 6b 61 6c 25 28 78 | 25 2c 79 25 29 3d 30 0d |:skal%(x|%,y%)=0.|
|00002ca0| 15 4a 06 3d 30 0d 15 54 | 05 3a 0d 15 5e 30 f4 20 |.J.=0..T|.:..^0. |
|00002cb0| 30 3d 62 67 2c 20 31 3d | 73 6f 72 74 28 67 75 6c |0=bg, 1=|sort(gul|
|00002cc0| 76 29 2c 20 32 2d 39 39 | 3d 76 65 67 67 20 31 30 |v), 2-99|=vegg 10|
|00002cd0| 30 2d 31 31 39 3d 61 74 | 6f 6d 0d 15 68 04 0d 15 |0-119=at|om..h...|
|00002ce0| 72 14 dd f2 70 75 74 28 | 58 25 2c 59 25 2c 45 4c |r...put(|X%,Y%,EL|
|00002cf0| 25 29 0d 15 7c 0d ea 20 | 73 70 72 24 2c 73 25 0d |%)..|.. |spr$,s%.|
|00002d00| 15 86 0b 73 70 72 24 3d | 22 22 0d 15 90 17 63 75 |...spr$=|""....cu|
|00002d10| 72 72 65 6e 74 25 28 58 | 25 2c 59 25 29 3d 45 4c |rrent%(X|%,Y%)=EL|
|00002d20| 25 0d 15 9a 0f 73 25 3d | 73 70 72 69 74 65 73 25 |%....s%=|sprites%|
|00002d30| 0d 15 a4 21 e7 20 45 4c | 25 3d 30 20 8c 20 73 70 |...!. EL|%=0 . sp|
|00002d40| 72 24 3d 22 62 22 2b c3 | 28 63 75 72 5f 62 67 25 |r$="b"+.|(cur_bg%|
|00002d50| 29 0d 15 ae 17 e7 20 45 | 4c 25 3d 31 20 8c 20 73 |)..... E|L%=1 . s|
|00002d60| 70 72 24 3d 22 62 30 22 | 0d 15 b8 29 e7 20 45 4c |pr$="b0"|...). EL|
|00002d70| 25 3e 31 20 80 20 45 4c | 25 3c 31 30 30 20 8c 20 |%>1 . EL|%<100 . |
|00002d80| 73 70 72 24 3d 22 76 22 | 2b c3 28 45 4c 25 2d 31 |spr$="v"|+.(EL%-1|
|00002d90| 29 0d 15 c2 2c e7 20 45 | 4c 25 3e 3d 31 30 30 20 |)...,. E|L%>=100 |
|00002da0| 8c 20 73 70 72 24 3d c3 | 28 45 4c 25 2d 31 30 30 |. spr$=.|(EL%-100|
|00002db0| 29 3a 73 25 3d 41 74 6f | 6d 53 70 72 25 0d 15 cc |):s%=Ato|mSpr%...|
|00002dc0| 3f e7 20 73 70 72 24 3c | 3e 22 22 20 8c 20 c8 99 |?. spr$<|>"" . ..|
|00002dd0| 20 53 70 72 4f 70 25 2c | 32 35 36 2b 33 34 2c 73 | SprOp%,|256+34,s|
|00002de0| 25 2c 73 70 72 24 2c 6e | 78 25 2b 58 25 2a 73 6c |%,spr$,n|x%+X%*sl|
|00002df0| 25 2c 6e 79 25 2b 59 25 | 2a 73 68 25 0d 15 d6 05 |%,ny%+Y%|*sh%....|
|00002e00| e1 0d 15 e0 05 3a 0d 15 | ea 14 dd f2 65 64 69 74 |.....:..|....edit|
|00002e10| 5f 61 74 6f 6d 28 41 4e | 25 29 0d 15 f4 21 ea 20 |_atom(AN|%)...!. |
|00002e20| 78 25 2c 79 25 2c 62 25 | 2c 6f 61 25 2c 6c 25 2c |x%,y%,b%|,oa%,l%,|
|00002e30| 65 6e 64 25 2c 69 25 2c | 41 2c 42 0d 15 fe 0a 65 |end%,i%,|A,B....e|
|00002e40| 6e 64 25 3d a3 0d 16 08 | 10 f2 73 68 6f 77 5f 61 |nd%=....|..show_a|
|00002e50| 74 6f 6d 73 32 0d 16 12 | 18 78 25 3d 41 4e 25 2a |toms2...|.x%=AN%*|
|00002e60| 73 6c 25 3a 79 25 3d 73 | 68 25 2b 31 36 0d 16 1c |sl%:y%=s|h%+16...|
|00002e70| 2c c8 99 20 53 70 72 4f | 70 25 2c 32 35 36 2b 33 |,.. SprO|p%,256+3|
|00002e80| 34 2c 41 74 6f 6d 53 70 | 72 25 2c c3 28 41 4e 25 |4,AtomSp|r%,.(AN%|
|00002e90| 29 2c 78 25 2c 79 25 2c | 30 0d 16 26 1a 62 25 3d |),x%,y%,|0..&.b%=|
|00002ea0| a4 67 65 74 5f 61 74 6f | 6d 5f 64 61 74 61 28 41 |.get_ato|m_data(A|
|00002eb0| 4e 25 29 0d 16 30 0c 6f | 61 25 3d 62 25 3f 31 0d |N%)..0.o|a%=b%?1.|
|00002ec0| 16 3a 05 f5 0d 16 44 09 | 20 6c 25 3d 30 0d 16 4e |.:....D.| l%=0..N|
|00002ed0| 0c 20 2a 46 58 31 35 2c | 30 0d 16 58 0b 20 c8 8e |. *FX15,|0..X. ..|
|00002ee0| 20 b9 20 ca 0d 16 62 15 | 20 20 c9 20 a6 2d 39 37 | . ...b.| . .-97|
|00002ef0| 20 3a 20 65 6e 64 25 3d | b9 0d 16 6c 15 20 20 c9 | : end%=|...l. .|
|00002f00| 20 a6 2d 39 39 20 3a 20 | 65 6e 64 25 3d b9 0d 16 | .-99 : |end%=...|
|00002f10| 76 1a 20 20 c9 20 a6 2d | 34 33 20 3a 20 6c 25 3d |v. . .-|43 : l%=|
|00002f20| 31 3a 69 25 3d 2d 34 33 | 0d 16 80 1a 20 20 c9 20 |1:i%=-43|.... . |
|00002f30| a6 2d 34 34 20 3a 20 6c | 25 3d 32 3a 69 25 3d 2d |.-44 : l|%=2:i%=-|
|00002f40| 34 34 0d 16 8a 1a 20 20 | c9 20 a6 2d 32 37 20 3a |44.... |. .-27 :|
|00002f50| 20 6c 25 3d 33 3a 69 25 | 3d 2d 32 37 0d 16 94 1b | l%=3:i%|=-27....|
|00002f60| 20 20 c9 20 a6 2d 31 30 | 39 3a 20 6c 25 3d 34 3a | . .-10|9: l%=4:|
|00002f70| 69 25 3d 2d 31 30 39 0d | 16 9e 1b 20 20 c9 20 a6 |i%=-109.|... . .|
|00002f80| 2d 31 32 35 3a 20 6c 25 | 3d 35 3a 69 25 3d 2d 31 |-125: l%|=5:i%=-1|
|00002f90| 32 35 0d 16 a8 1b 20 20 | c9 20 a6 2d 31 30 38 3a |25.... |. .-108:|
|00002fa0| 20 6c 25 3d 36 3a 69 25 | 3d 2d 31 30 38 0d 16 b2 | l%=6:i%|=-108...|
|00002fb0| 1b 20 20 c9 20 a6 2d 31 | 32 33 3a 20 6c 25 3d 37 |. . .-1|23: l%=7|
|00002fc0| 3a 69 25 3d 2d 31 32 33 | 0d 16 bc 1a 20 20 c9 20 |:i%=-123|.... . |
|00002fd0| a6 2d 32 38 20 3a 20 6c | 25 3d 38 3a 69 25 3d 2d |.-28 : l|%=8:i%=-|
|00002fe0| 32 38 0d 16 c6 06 20 cb | 0d 16 d0 0d 20 e7 20 6c |28.... .|.... . l|
|00002ff0| 25 3e 30 20 8c 0d 16 da | 1b 20 20 e7 20 a6 2d 31 |%>0 ....|. . .-1|
|00003000| 20 84 20 a6 2d 31 30 37 | 20 8c 20 6c 25 2b 3d 38 | . .-107| . l%+=8|
|00003010| 0d 16 e4 19 20 20 f2 66 | 69 6e 6e 6c 65 64 69 67 |.... .f|innledig|
|00003020| 28 62 25 2b 32 2c 6c 25 | 29 0d 16 ee 19 20 20 f2 |(b%+2,l%|).... .|
|00003030| 6d 61 6b 65 5f 6f 6e 65 | 5f 61 74 6f 6d 28 41 4e |make_one|_atom(AN|
|00003040| 25 29 0d 16 f8 2e 20 20 | c8 99 20 53 70 72 4f 70 |%).... |.. SprOp|
|00003050| 25 2c 32 35 36 2b 33 34 | 2c 41 74 6f 6d 53 70 72 |%,256+34|,AtomSpr|
|00003060| 25 2c c3 28 41 4e 25 29 | 2c 78 25 2c 79 25 2c 30 |%,.(AN%)|,x%,y%,0|
|00003070| 0d 17 02 06 20 cd 0d 17 | 0c 1d 20 f2 76 65 6c 67 |.... ...|.. .velg|
|00003080| 5f 61 74 6f 6d 28 62 25 | 2c 41 4e 25 2c 78 25 2c |_atom(b%|,AN%,x%,|
|00003090| 79 25 29 0d 17 16 17 20 | e7 20 69 25 3c 30 20 8c |y%).... |. i%<0 .|
|000030a0| 20 f5 20 fd 20 ac 20 a6 | 69 25 0d 17 20 1c 20 c8 | . . . .|i%.. . .|
|000030b0| 97 20 41 2c 41 2c 42 3a | e7 20 42 3e 34 20 8c 20 |. A,A,B:|. B>4 . |
|000030c0| 65 6e 64 25 3d b9 0d 17 | 2a 0c fd 20 65 6e 64 25 |end%=...|*.. end%|
|000030d0| 3d b9 0d 17 34 0b 2a 46 | 58 31 35 2c 30 0d 17 3e |=...4.*F|X15,0..>|
|000030e0| 0a f2 63 75 72 61 74 0d | 17 48 2a c8 99 20 53 70 |..curat.|.H*.. Sp|
|000030f0| 72 4f 70 25 2c 32 35 36 | 2b 33 34 2c 73 70 72 69 |rOp%,256|+34,spri|
|00003100| 74 65 73 25 2c 22 62 30 | 22 2c 78 25 2c 79 25 2c |tes%,"b0|",x%,y%,|
|00003110| 30 0d 17 52 2b c8 99 20 | 53 70 72 4f 70 25 2c 32 |0..R+.. |SprOp%,2|
|00003120| 35 36 2b 33 34 2c 41 74 | 6f 6d 53 70 72 25 2c c3 |56+34,At|omSpr%,.|
|00003130| 28 41 4e 25 29 2c 78 25 | 2c 30 2c 30 0d 17 5c 0a |(AN%),x%|,0,0..\.|
|00003140| f2 63 75 72 61 74 0d 17 | 66 0e e6 20 30 2c 30 20 |.curat..|f.. 0,0 |
|00003150| c8 9c 20 30 0d 17 70 2f | c8 93 20 c8 90 20 73 68 |.. 0..p/|.. .. sh|
|00003160| 6f 77 5f 61 74 78 25 2c | 73 68 6f 77 5f 61 74 79 |ow_atx%,|show_aty|
|00003170| 25 2c 73 68 6f 77 5f 61 | 74 61 25 2a 73 6c 25 2c |%,show_a|ta%*sl%,|
|00003180| 73 68 25 0d 17 7a 10 f2 | 64 72 61 77 5f 73 63 72 |sh%..z..|draw_scr|
|00003190| 61 74 6f 0d 17 84 05 e1 | 0d 17 8e 05 3a 0d 17 98 |ato.....|....:...|
|000031a0| 16 dd f2 66 69 6e 6e 6c | 65 64 69 67 28 62 25 2c |...finnl|edig(b%,|
|000031b0| 6c 25 29 0d 17 a2 0b ea | 20 51 25 2c 70 25 0d 17 |l%).....| Q%,p%..|
|000031c0| ac 09 70 25 3d 2d 31 0d | 17 b6 0e e3 20 51 25 3d |..p%=-1.|.... Q%=|
|000031d0| 30 20 b8 20 33 0d 17 c0 | 2d 20 e7 20 6c 25 3c 39 |0 . 3...|- . l%<9|
|000031e0| 20 80 20 28 62 25 3f 51 | 25 3d 6c 25 20 84 20 62 | . (b%?Q|%=l% . b|
|000031f0| 25 3f 51 25 3d 6c 25 2b | 38 29 20 8c 20 70 25 3d |%?Q%=l%+|8) . p%=|
|00003200| 51 25 0d 17 ca 2d 20 e7 | 20 6c 25 3e 38 20 80 20 |Q%...- .| l%>8 . |
|00003210| 28 62 25 3f 51 25 3d 6c | 25 20 84 20 62 25 3f 51 |(b%?Q%=l|% . b%?Q|
|00003220| 25 3d 6c 25 2d 38 29 20 | 8c 20 70 25 3d 51 25 0d |%=l%-8) |. p%=Q%.|
|00003230| 17 d4 05 ed 0d 17 de 0d | e7 20 70 25 3e 2d 31 20 |........|. p%>-1 |
|00003240| 8c 0d 17 e8 0c 20 62 25 | 3f 70 25 3d 30 0d 17 f2 |..... b%|?p%=0...|
|00003250| 06 20 e1 0d 17 fc 05 cc | 0d 18 06 0a 20 70 25 3d |. ......|.... p%=|
|00003260| 2d 31 0d 18 10 0f 20 e3 | 20 51 25 3d 30 20 b8 20 |-1.... .| Q%=0 . |
|00003270| 33 0d 18 1a 17 20 20 e7 | 20 62 25 3f 51 25 3d 30 |3.... .| b%?Q%=0|
|00003280| 20 8c 20 70 25 3d 51 25 | 0d 18 24 06 20 ed 0d 18 | . p%=Q%|..$. ...|
|00003290| 2e 17 20 e7 20 70 25 3e | 2d 31 20 8c 20 62 25 3f |.. . p%>|-1 . b%?|
|000032a0| 70 25 3d 6c 25 0d 18 38 | 05 cd 0d 18 42 05 e1 0d |p%=l%..8|....B...|
|000032b0| 18 4c 05 3a 0d 18 56 1d | dd f2 76 65 6c 67 5f 61 |.L.:..V.|..velg_a|
|000032c0| 74 6f 6d 28 62 25 2c 41 | 4e 25 2c 78 25 2c 79 25 |tom(b%,A|N%,x%,y%|
|000032d0| 29 0d 18 60 16 ea 20 58 | 25 2c 59 25 2c 42 25 2c |)..`.. X|%,Y%,B%,|
|000032e0| 61 74 25 2c 41 2c 42 0d | 18 6a 0f c8 97 20 58 25 |at%,A,B.|.j... X%|
|000032f0| 2c 59 25 2c 42 25 0d 18 | 74 0e e7 20 42 25 3d 30 |,Y%,B%..|t.. B%=0|
|00003300| 20 8c 20 e1 0d 18 7e 33 | e7 20 58 25 3c 73 68 6f | . ...~3|. X%<sho|
|00003310| 77 5f 61 74 78 25 20 84 | 20 58 25 3e 73 68 6f 77 |w_atx% .| X%>show|
|00003320| 5f 61 74 78 25 2b 73 68 | 6f 77 5f 61 74 61 25 2a |_atx%+sh|ow_ata%*|
|00003330| 73 6c 25 20 8c 20 e1 0d | 18 88 29 e7 20 59 25 3c |sl% . ..|..). Y%<|
|00003340| 73 68 6f 77 5f 61 74 79 | 25 20 84 20 59 25 3e 73 |show_aty|% . Y%>s|
|00003350| 68 6f 77 5f 61 74 79 25 | 2b 73 68 25 20 8c 20 e1 |how_aty%|+sh% . .|
|00003360| 0d 18 92 0b c8 8e 20 42 | 25 20 ca 0d 18 9c 0a 20 |...... B|% ..... |
|00003370| c9 20 34 20 3a 0d 18 a6 | 1e 20 20 61 74 25 3d 28 |. 4 :...|. at%=(|
|00003380| 58 25 2d 73 68 6f 77 5f | 61 74 78 25 29 20 81 20 |X%-show_|atx%) . |
|00003390| 73 6c 25 0d 18 b0 16 20 | 20 61 74 25 2b 3d 73 68 |sl%.... | at%+=sh|
|000033a0| 6f 77 5f 61 74 70 25 2b | 31 0d 18 ba 0e 20 20 62 |ow_atp%+|1.... b|
|000033b0| 25 3f 31 3d 61 74 25 0d | 18 c4 19 20 20 f2 6d 61 |%?1=at%.|... .ma|
|000033c0| 6b 65 5f 6f 6e 65 5f 61 | 74 6f 6d 28 41 4e 25 29 |ke_one_a|tom(AN%)|
|000033d0| 0d 18 ce 2e 20 20 c8 99 | 20 53 70 72 4f 70 25 2c |.... ..| SprOp%,|
|000033e0| 32 35 36 2b 33 34 2c 41 | 74 6f 6d 53 70 72 25 2c |256+34,A|tomSpr%,|
|000033f0| c3 28 41 4e 25 29 2c 78 | 25 2c 79 25 2c 30 0d 18 |.(AN%),x|%,y%,0..|
|00003400| d8 0a 20 c9 20 32 20 3a | 0d 18 e2 22 20 20 e7 20 |.. . 2 :|..." . |
|00003410| 73 68 6f 77 5f 61 74 70 | 25 3e 30 20 8c 20 73 68 |show_atp|%>0 . sh|
|00003420| 6f 77 5f 61 74 70 25 2d | 3d 31 0d 18 ec 12 20 20 |ow_atp%-|=1.... |
|00003430| f2 73 68 6f 77 5f 61 74 | 6f 6d 73 32 0d 18 f6 17 |.show_at|oms2....|
|00003440| 20 20 f5 3a c8 97 20 41 | 2c 41 2c 42 3a fd 20 42 | .:.. A|,A,B:. B|
|00003450| 3c 3e 32 0d 19 00 0a 20 | c9 20 31 20 3a 0d 19 0a |<>2.... |. 1 :...|
|00003460| 34 20 20 e7 20 73 68 6f | 77 5f 61 74 70 25 3c 73 |4 . sho|w_atp%<s|
|00003470| 68 6f 77 5f 61 74 6d 25 | 2d 73 68 6f 77 5f 61 74 |how_atm%|-show_at|
|00003480| 61 25 20 8c 20 73 68 6f | 77 5f 61 74 70 25 2b 3d |a% . sho|w_atp%+=|
|00003490| 31 0d 19 14 12 20 20 f2 | 73 68 6f 77 5f 61 74 6f |1.... .|show_ato|
|000034a0| 6d 73 32 0d 19 1e 17 20 | 20 f5 3a c8 97 20 41 2c |ms2.... | .:.. A,|
|000034b0| 41 2c 42 3a fd 20 42 3c | 3e 31 0d 19 28 05 cb 0d |A,B:. B<|>1..(...|
|000034c0| 19 32 05 e1 0d 19 3c 05 | 3a 0d 19 46 11 dd f2 73 |.2....<.|:..F...s|
|000034d0| 68 6f 77 5f 61 74 6f 6d | 73 32 0d 19 50 08 ea 20 |how_atom|s2..P.. |
|000034e0| 51 25 0d 19 5a 18 e3 20 | 51 25 3d 30 20 b8 20 73 |Q%..Z.. |Q%=0 . s|
|000034f0| 68 6f 77 5f 61 74 61 25 | 2d 31 0d 19 64 4f 20 c8 |how_ata%|-1..dO .|
|00003500| 99 20 53 70 72 4f 70 25 | 2c 32 35 36 2b 33 34 2c |. SprOp%|,256+34,|
|00003510| 73 70 72 69 74 65 73 25 | 2c 22 61 22 2b c3 28 73 |sprites%|,"a"+.(s|
|00003520| 68 6f 77 5f 61 74 70 25 | 2b 51 25 2b 31 29 2c 73 |how_atp%|+Q%+1),s|
|00003530| 68 6f 77 5f 61 74 78 25 | 2b 51 25 2a 73 6c 25 2c |how_atx%|+Q%*sl%,|
|00003540| 73 68 6f 77 5f 61 74 79 | 25 0d 19 6e 05 ed 0d 19 |show_aty|%..n....|
|00003550| 78 05 e1 0d 19 82 05 3a | 0d 19 8c 0f dd f2 76 65 |x......:|......ve|
|00003560| 6c 67 5f 76 65 67 67 0d | 19 96 16 ea 20 58 25 2c |lg_vegg.|.... X%,|
|00003570| 59 25 2c 42 25 2c 61 74 | 25 2c 41 2c 42 0d 19 a0 |Y%,B%,at|%,A,B...|
|00003580| 0f c8 97 20 58 25 2c 59 | 25 2c 42 25 0d 19 aa 0e |... X%,Y|%,B%....|
|00003590| e7 20 42 25 3d 30 20 8c | 20 e1 0d 19 b4 33 e7 20 |. B%=0 .| ....3. |
|000035a0| 58 25 3c 73 68 6f 77 5f | 76 67 78 25 20 84 20 58 |X%<show_|vgx% . X|
|000035b0| 25 3e 73 68 6f 77 5f 76 | 67 78 25 2b 73 68 6f 77 |%>show_v|gx%+show|
|000035c0| 5f 76 67 61 25 2a 73 6c | 25 20 8c 20 e1 0d 19 be |_vga%*sl|% . ....|
|000035d0| 29 e7 20 59 25 3c 73 68 | 6f 77 5f 76 67 79 25 20 |). Y%<sh|ow_vgy% |
|000035e0| 84 20 59 25 3e 73 68 6f | 77 5f 76 67 79 25 2b 73 |. Y%>sho|w_vgy%+s|
|000035f0| 68 25 20 8c 20 e1 0d 19 | c8 0b c8 8e 20 42 25 20 |h% . ...|.... B% |
|00003600| ca 0d 19 d2 0a 20 c9 20 | 34 20 3a 0d 19 dc 22 20 |..... . |4 :..." |
|00003610| 20 63 75 72 5f 65 6c 25 | 3d 28 58 25 2d 73 68 6f | cur_el%|=(X%-sho|
|00003620| 77 5f 76 67 78 25 29 20 | 81 20 73 6c 25 0d 19 e6 |w_vgx%) |. sl%...|
|00003630| 1a 20 20 63 75 72 5f 65 | 6c 25 2b 3d 31 2b 73 68 |. cur_e|l%+=1+sh|
|00003640| 6f 77 5f 76 67 70 25 0d | 19 f0 10 20 20 f2 73 68 |ow_vgp%.|... .sh|
|00003650| 6f 77 5f 76 65 67 67 0d | 19 fa 0a 20 c9 20 32 20 |ow_vegg.|... . 2 |
|00003660| 3a 0d 1a 04 22 20 20 e7 | 20 73 68 6f 77 5f 76 67 |:..." .| show_vg|
|00003670| 70 25 3e 30 20 8c 20 73 | 68 6f 77 5f 76 67 70 25 |p%>0 . s|how_vgp%|
|00003680| 2d 3d 31 0d 1a 0e 10 20 | 20 f2 73 68 6f 77 5f 76 |-=1.... | .show_v|
|00003690| 65 67 67 0d 1a 18 17 20 | 20 f5 3a c8 97 20 41 2c |egg.... | .:.. A,|
|000036a0| 41 2c 42 3a fd 20 42 3c | 3e 32 0d 1a 22 0a 20 c9 |A,B:. B<|>2..". .|
|000036b0| 20 31 20 3a 0d 1a 2c 34 | 20 20 e7 20 73 68 6f 77 | 1 :..,4| . show|
|000036c0| 5f 76 67 70 25 3c 73 68 | 6f 77 5f 76 67 6d 25 2d |_vgp%<sh|ow_vgm%-|
|000036d0| 73 68 6f 77 5f 76 67 61 | 25 20 8c 20 73 68 6f 77 |show_vga|% . show|
|000036e0| 5f 76 67 70 25 2b 3d 31 | 0d 1a 36 10 20 20 f2 73 |_vgp%+=1|..6. .s|
|000036f0| 68 6f 77 5f 76 65 67 67 | 0d 1a 40 17 20 20 f5 3a |how_vegg|..@. .:|
|00003700| c8 97 20 41 2c 41 2c 42 | 3a fd 20 42 3c 3e 31 0d |.. A,A,B|:. B<>1.|
|00003710| 1a 4a 05 cb 0d 1a 54 05 | e1 0d 1a 5e 05 3a 0d 1a |.J....T.|...^.:..|
|00003720| 68 0f dd f2 73 68 6f 77 | 5f 76 65 67 67 0d 1a 72 |h...show|_vegg..r|
|00003730| 08 ea 20 51 25 0d 1a 7c | 18 e3 20 51 25 3d 30 20 |.. Q%..||.. Q%=0 |
|00003740| b8 20 73 68 6f 77 5f 76 | 67 61 25 2d 31 0d 1a 86 |. show_v|ga%-1...|
|00003750| 4f 20 c8 99 20 53 70 72 | 4f 70 25 2c 32 35 36 2b |O .. Spr|Op%,256+|
|00003760| 33 34 2c 73 70 72 69 74 | 65 73 25 2c 22 76 22 2b |34,sprit|es%,"v"+|
|00003770| c3 28 73 68 6f 77 5f 76 | 67 70 25 2b 51 25 2b 31 |.(show_v|gp%+Q%+1|
|00003780| 29 2c 73 68 6f 77 5f 76 | 67 78 25 2b 51 25 2a 73 |),show_v|gx%+Q%*s|
|00003790| 6c 25 2c 73 68 6f 77 5f | 76 67 79 25 0d 1a 90 05 |l%,show_|vgy%....|
|000037a0| ed 0d 1a 9a 39 e7 20 63 | 75 72 5f 65 6c 25 3e 3d |....9. c|ur_el%>=|
|000037b0| 73 68 6f 77 5f 76 67 70 | 25 20 80 20 63 75 72 5f |show_vgp|% . cur_|
|000037c0| 65 6c 25 3c 3d 73 68 6f | 77 5f 76 67 70 25 2b 73 |el%<=sho|w_vgp%+s|
|000037d0| 68 6f 77 5f 76 67 61 25 | 20 8c 0d 1a a4 11 20 e6 |how_vga%| ..... .|
|000037e0| 20 30 2c 31 20 c8 9c 20 | 32 35 35 0d 1a ae 41 20 | 0,1 .. |255...A |
|000037f0| c8 93 20 73 68 6f 77 5f | 76 67 78 25 2b 28 63 75 |.. show_|vgx%+(cu|
|00003800| 72 5f 65 6c 25 2d 73 68 | 6f 77 5f 76 67 70 25 2d |r_el%-sh|ow_vgp%-|
|00003810| 31 29 2a 73 6c 25 2c 73 | 68 6f 77 5f 76 67 79 25 |1)*sl%,s|how_vgy%|
|00003820| 2c 73 6c 25 2d 34 2c 73 | 68 25 2d 34 0d 1a b8 05 |,sl%-4,s|h%-4....|
|00003830| cd 0d 1a c2 05 e1 0d 1a | cc 05 3a 0d 1a d6 0d dd |........|..:.....|
|00003840| f2 76 65 6c 67 5f 62 67 | 0d 1a e0 16 ea 20 58 25 |.velg_bg|..... X%|
|00003850| 2c 59 25 2c 42 25 2c 61 | 74 25 2c 41 2c 42 0d 1a |,Y%,B%,a|t%,A,B..|
|00003860| ea 0f c8 97 20 58 25 2c | 59 25 2c 42 25 0d 1a f4 |.... X%,|Y%,B%...|
|00003870| 0e e7 20 42 25 3d 30 20 | 8c 20 e1 0d 1a fe 33 e7 |.. B%=0 |. ....3.|
|00003880| 20 58 25 3c 73 68 6f 77 | 5f 62 67 78 25 20 84 20 | X%<show|_bgx% . |
|00003890| 58 25 3e 73 68 6f 77 5f | 62 67 78 25 2b 73 68 6f |X%>show_|bgx%+sho|
|000038a0| 77 5f 62 67 61 25 2a 73 | 6c 25 20 8c 20 e1 0d 1b |w_bga%*s|l% . ...|
|000038b0| 08 29 e7 20 59 25 3c 73 | 68 6f 77 5f 62 67 79 25 |.). Y%<s|how_bgy%|
|000038c0| 20 84 20 59 25 3e 73 68 | 6f 77 5f 62 67 79 25 2b | . Y%>sh|ow_bgy%+|
|000038d0| 73 68 25 20 8c 20 e1 0d | 1b 12 0b c8 8e 20 42 25 |sh% . ..|..... B%|
|000038e0| 20 ca 0d 1b 1c 0a 20 c9 | 20 34 20 3a 0d 1b 26 22 | ..... .| 4 :..&"|
|000038f0| 20 20 63 75 72 5f 62 67 | 25 3d 28 58 25 2d 73 68 | cur_bg|%=(X%-sh|
|00003900| 6f 77 5f 62 67 78 25 29 | 20 81 20 73 6c 25 0d 1b |ow_bgx%)| . sl%..|
|00003910| 30 1a 20 20 63 75 72 5f | 62 67 25 2b 3d 31 2b 73 |0. cur_|bg%+=1+s|
|00003920| 68 6f 77 5f 62 67 70 25 | 0d 1b 3a 0e 20 20 f2 73 |how_bgp%|..:. .s|
|00003930| 68 6f 77 5f 62 67 0d 1b | 44 11 20 20 f2 64 72 61 |how_bg..|D. .dra|
|00003940| 77 5f 73 63 72 62 67 0d | 1b 4e 0a 20 c9 20 32 20 |w_scrbg.|.N. . 2 |
|00003950| 3a 0d 1b 58 22 20 20 e7 | 20 73 68 6f 77 5f 62 67 |:..X" .| show_bg|
|00003960| 70 25 3e 30 20 8c 20 73 | 68 6f 77 5f 62 67 70 25 |p%>0 . s|how_bgp%|
|00003970| 2d 3d 31 0d 1b 62 0e 20 | 20 f2 73 68 6f 77 5f 62 |-=1..b. | .show_b|
|00003980| 67 0d 1b 6c 17 20 20 f5 | 3a c8 97 20 41 2c 41 2c |g..l. .|:.. A,A,|
|00003990| 42 3a fd 20 42 3c 3e 32 | 0d 1b 76 0a 20 c9 20 31 |B:. B<>2|..v. . 1|
|000039a0| 20 3a 0d 1b 80 34 20 20 | e7 20 73 68 6f 77 5f 62 | :...4 |. show_b|
|000039b0| 67 70 25 3c 73 68 6f 77 | 5f 62 67 6d 25 2d 73 68 |gp%<show|_bgm%-sh|
|000039c0| 6f 77 5f 62 67 61 25 20 | 8c 20 73 68 6f 77 5f 62 |ow_bga% |. show_b|
|000039d0| 67 70 25 2b 3d 31 0d 1b | 8a 0e 20 20 f2 73 68 6f |gp%+=1..|.. .sho|
|000039e0| 77 5f 62 67 0d 1b 94 17 | 20 20 f5 3a c8 97 20 41 |w_bg....| .:.. A|
|000039f0| 2c 41 2c 42 3a fd 20 42 | 3c 3e 31 0d 1b 9e 05 cb |,A,B:. B|<>1.....|
|00003a00| 0d 1b a8 05 e1 0d 1b b2 | 05 3a 0d 1b bc 0d dd f2 |........|.:......|
|00003a10| 73 68 6f 77 5f 62 67 0d | 1b c6 08 ea 20 51 25 0d |show_bg.|.... Q%.|
|00003a20| 1b d0 18 e3 20 51 25 3d | 30 20 b8 20 73 68 6f 77 |.... Q%=|0 . show|
|00003a30| 5f 62 67 61 25 2d 31 0d | 1b da 4f 20 c8 99 20 53 |_bga%-1.|..O .. S|
|00003a40| 70 72 4f 70 25 2c 32 35 | 36 2b 33 34 2c 73 70 72 |prOp%,25|6+34,spr|
|00003a50| 69 74 65 73 25 2c 22 62 | 22 2b c3 28 73 68 6f 77 |ites%,"b|"+.(show|
|00003a60| 5f 62 67 70 25 2b 51 25 | 2b 31 29 2c 73 68 6f 77 |_bgp%+Q%|+1),show|
|00003a70| 5f 62 67 78 25 2b 51 25 | 2a 73 6c 25 2c 73 68 6f |_bgx%+Q%|*sl%,sho|
|00003a80| 77 5f 62 67 79 25 0d 1b | e4 05 ed 0d 1b ee 39 e7 |w_bgy%..|......9.|
|00003a90| 20 63 75 72 5f 62 67 25 | 3e 3d 73 68 6f 77 5f 62 | cur_bg%|>=show_b|
|00003aa0| 67 70 25 20 80 20 63 75 | 72 5f 62 67 25 3c 3d 73 |gp% . cu|r_bg%<=s|
|00003ab0| 68 6f 77 5f 62 67 70 25 | 2b 73 68 6f 77 5f 62 67 |how_bgp%|+show_bg|
|00003ac0| 61 25 20 8c 0d 1b f8 11 | 20 e6 20 30 2c 31 20 c8 |a% .....| . 0,1 .|
|00003ad0| 9c 20 32 35 35 0d 1c 02 | 41 20 c8 93 20 73 68 6f |. 255...|A .. sho|
|00003ae0| 77 5f 62 67 78 25 2b 28 | 63 75 72 5f 62 67 25 2d |w_bgx%+(|cur_bg%-|
|00003af0| 73 68 6f 77 5f 62 67 70 | 25 2d 31 29 2a 73 6c 25 |show_bgp|%-1)*sl%|
|00003b00| 2c 73 68 6f 77 5f 62 67 | 79 25 2c 73 6c 25 2d 34 |,show_bg|y%,sl%-4|
|00003b10| 2c 73 68 25 2d 34 0d 1c | 0c 05 cd 0d 1c 16 05 e1 |,sh%-4..|........|
|00003b20| 0d 1c 20 05 3a 0d 1c 2a | 10 dd f2 70 72 69 6e 74 |.. .:..*|...print|
|00003b30| 5f 74 69 6d 65 0d 1c 34 | 08 ea 20 41 24 0d 1c 3e |_time..4|.. A$..>|
|00003b40| 0e fb 20 36 33 3a fb 20 | 31 32 38 0d 1c 48 1e f1 |.. 63:. |128..H..|
|00003b50| 20 8a 74 69 6d 65 78 25 | 2c 74 69 6d 65 79 25 29 | .timex%|,timey%)|
|00003b60| 3b 22 54 49 4d 45 3d 22 | 3b 0d 1c 52 11 41 24 3d |;"TIME="|;..R.A$=|
|00003b70| c3 28 74 69 6d 65 25 2a | 34 29 0d 1c 5c 1f e7 20 |.(time%*|4)..\.. |
|00003b80| a9 41 24 3c 33 20 8c 20 | 41 24 3d c4 33 2d a9 41 |.A$<3 . |A$=.3-.A|
|00003b90| 24 2c 22 30 22 29 2b 41 | 24 0d 1c 66 07 f1 41 24 |$,"0")+A|$..f..A$|
|00003ba0| 0d 1c 70 05 e1 0d 1c 7a | 05 3a 0d 1c 84 0e dd f2 |..p....z|.:......|
|00003bb0| 70 72 69 6e 74 5f 6f 6e | 0d 1c 8e 0e fb 20 36 33 |print_on|..... 63|
|00003bc0| 3a fb 20 31 32 38 0d 1c | 98 2d f1 8a 6f 6e 78 25 |:. 128..|.-..onx%|
|00003bd0| 2c 6f 6e 79 25 29 3b 3a | e7 20 6f 6e 25 3d 30 20 |,ony%);:|. on%=0 |
|00003be0| 8c 20 f1 20 22 4f 4e 20 | 22 20 8b 20 f1 20 22 4f |. . "ON |" . . "O|
|00003bf0| 46 46 22 0d 1c a2 32 f1 | 8a 62 6f 6e 78 25 2c 62 |FF"...2.|.bonx%,b|
|00003c00| 6f 6e 79 25 29 3b 3a e7 | 20 62 6f 6e 25 3d 30 20 |ony%);:.| bon%=0 |
|00003c10| 8c 20 f1 20 22 62 4f 4e | 20 22 20 8b 20 f1 20 22 |. . "bON| " . . "|
|00003c20| 62 4f 46 46 22 0d 1c ac | 05 e1 0d 1c b6 05 3a 0d |bOFF"...|......:.|
|00003c30| 1c c0 10 dd f2 70 72 69 | 6e 74 5f 6e 61 6d 65 0d |.....pri|nt_name.|
|00003c40| 1c ca 0e fb 20 36 33 3a | fb 20 31 33 34 0d 1c d4 |.... 63:|. 134...|
|00003c50| 3a f1 8a 6e 61 6d 65 78 | 25 2c 6e 61 6d 65 79 25 |:..namex|%,namey%|
|00003c60| 29 3b 22 4e 61 6d 65 20 | 3a 20 22 3b 6d 6f 6c 6e |);"Name |: ";moln|
|00003c70| 61 6d 65 24 3b c4 31 36 | 2d a9 6d 6f 6c 6e 61 6d |ame$;.16|-.molnam|
|00003c80| 65 24 2c 22 20 22 29 0d | 1c de 05 e1 0d 1c e8 05 |e$," ").|........|
|00003c90| 3a 0d 1c f2 10 dd f2 65 | 6e 64 72 65 5f 74 69 6d |:......e|ndre_tim|
|00003ca0| 65 0d 1c fc 0e ea 20 58 | 25 2c 59 25 2c 5a 25 0d |e..... X|%,Y%,Z%.|
|00003cb0| 1d 06 0f c8 97 20 58 25 | 2c 59 25 2c 5a 25 0d 1d |..... X%|,Y%,Z%..|
|00003cc0| 10 0e e7 20 5a 25 3d 30 | 20 8c 20 e1 0d 1d 1a 29 |... Z%=0| . ....)|
|00003cd0| e7 20 58 25 3c 74 69 6d | 65 78 25 2a 33 32 20 84 |. X%<tim|ex%*32 .|
|00003ce0| 20 58 25 3e 28 74 69 6d | 65 78 25 2b 38 29 2a 33 | X%>(tim|ex%+8)*3|
|00003cf0| 32 20 8c 20 e1 0d 1d 24 | 20 e7 20 74 69 6d 65 79 |2 . ...$| . timey|
|00003d00| 25 3c 3e 28 31 30 32 34 | 2d 59 25 29 20 81 20 33 |%<>(1024|-Y%) . 3|
|00003d10| 32 20 8c 20 e1 0d 1d 2e | 21 e7 20 5a 25 3d 31 20 |2 . ....|!. Z%=1 |
|00003d20| 80 20 74 69 6d 65 25 3c | 32 34 39 20 8c 20 74 69 |. time%<|249 . ti|
|00003d30| 6d 65 25 2b 3d 31 0d 1d | 38 1f e7 20 5a 25 3d 34 |me%+=1..|8.. Z%=4|
|00003d40| 20 80 20 74 69 6d 65 25 | 3e 31 20 8c 20 74 69 6d | . time%|>1 . tim|
|00003d50| 65 25 2d 3d 31 0d 1d 42 | 0f f2 70 72 69 6e 74 5f |e%-=1..B|..print_|
|00003d60| 74 69 6d 65 0d 1d 4c 20 | e7 20 a6 2d 31 20 8c 20 |time..L |. .-1 . |
|00003d70| f5 20 c8 97 20 58 25 2c | 59 25 2c 5a 25 3a fd 20 |. .. X%,|Y%,Z%:. |
|00003d80| 5a 25 3d 30 0d 1d 56 05 | e1 0d 1d 60 05 3a 0d 1d |Z%=0..V.|...`.:..|
|00003d90| 6a 10 dd f2 65 6e 64 72 | 65 5f 6e 61 6d 65 0d 1d |j...endr|e_name..|
|00003da0| 74 11 ea 20 58 25 2c 59 | 25 2c 5a 25 2c 6e 24 0d |t.. X%,Y|%,Z%,n$.|
|00003db0| 1d 7e 07 ea 20 85 0d 1d | 88 0d ee 20 85 20 ea 20 |.~.. ...|... . . |
|00003dc0| 87 3a e1 0d 1d 92 0f c8 | 97 20 58 25 2c 59 25 2c |.:......|. X%,Y%,|
|00003dd0| 5a 25 0d 1d 9c 0e e7 20 | 5a 25 3d 30 20 8c 20 e1 |Z%..... |Z%=0 . .|
|00003de0| 0d 1d a6 2a e7 20 58 25 | 3c 6e 61 6d 65 78 25 2a |...*. X%|<namex%*|
|00003df0| 33 32 20 84 20 58 25 3e | 28 6e 61 6d 65 78 25 2b |32 . X%>|(namex%+|
|00003e00| 32 33 29 2a 33 32 20 8c | 20 e1 0d 1d b0 20 e7 20 |23)*32 .| .... . |
|00003e10| 6e 61 6d 65 79 25 3c 3e | 28 31 30 32 34 2d 59 25 |namey%<>|(1024-Y%|
|00003e20| 29 20 81 20 33 32 20 8c | 20 e1 0d 1d ba 0f f2 70 |) . 32 .| ......p|
|00003e30| 72 69 6e 74 5f 6e 61 6d | 65 0d 1d c4 05 ee 0d 1d |rint_nam|e.......|
|00003e40| ce 21 6e 24 3d a4 69 6e | 70 75 74 28 6e 61 6d 65 |.!n$=.in|put(name|
|00003e50| 78 25 2b 37 2c 6e 61 6d | 65 79 25 2c 31 36 29 0d |x%+7,nam|ey%,16).|
|00003e60| 1d d8 05 87 0d 1d e2 1a | e7 20 6e 24 3c 3e 22 22 |........|. n$<>""|
|00003e70| 20 8c 20 6d 6f 6c 6e 61 | 6d 65 24 3d 6e 24 0d 1d | . molna|me$=n$..|
|00003e80| ec 0f f2 70 72 69 6e 74 | 5f 6e 61 6d 65 0d 1d f6 |...print|_name...|
|00003e90| 05 e1 0d 1e 00 05 3a 0d | 1e 0a 0e dd f2 65 6e 64 |......:.|.....end|
|00003ea0| 72 65 5f 6f 6e 0d 1e 14 | 11 ea 20 58 25 2c 59 25 |re_on...|.. X%,Y%|
|00003eb0| 2c 5a 25 2c 6e 24 0d 1e | 1e 0f c8 97 20 58 25 2c |,Z%,n$..|.... X%,|
|00003ec0| 59 25 2c 5a 25 0d 1e 28 | 0e e7 20 5a 25 3d 30 20 |Y%,Z%..(|.. Z%=0 |
|00003ed0| 8c 20 e1 0d 1e 32 25 e7 | 20 58 25 3c 6f 6e 78 25 |. ...2%.| X%<onx%|
|00003ee0| 2a 33 32 20 84 20 58 25 | 3e 28 6f 6e 78 25 2b 33 |*32 . X%|>(onx%+3|
|00003ef0| 29 2a 33 32 20 8c 20 e1 | 0d 1e 3c 1e e7 20 6f 6e |)*32 . .|..<.. on|
|00003f00| 79 25 3c 3e 28 31 30 32 | 34 2d 59 25 29 20 81 20 |y%<>(102|4-Y%) . |
|00003f10| 33 32 20 8c 20 e1 0d 1e | 46 1b e7 20 6f 6e 25 3d |32 . ...|F.. on%=|
|00003f20| 30 20 8c 20 6f 6e 25 3d | 31 20 8b 20 6f 6e 25 3d |0 . on%=|1 . on%=|
|00003f30| 30 0d 1e 50 0d f2 70 72 | 69 6e 74 5f 6f 6e 0d 1e |0..P..pr|int_on..|
|00003f40| 5a 18 f5 3a c8 97 20 58 | 25 2c 59 25 2c 5a 25 3a |Z..:.. X|%,Y%,Z%:|
|00003f50| fd 20 5a 25 3d 30 0d 1e | 64 05 e1 0d 1e 6e 05 3a |. Z%=0..|d....n.:|
|00003f60| 0d 1e 78 0f dd f2 65 6e | 64 72 65 5f 62 6f 6e 0d |..x...en|dre_bon.|
|00003f70| 1e 82 11 ea 20 58 25 2c | 59 25 2c 5a 25 2c 6e 24 |.... X%,|Y%,Z%,n$|
|00003f80| 0d 1e 8c 0f c8 97 20 58 | 25 2c 59 25 2c 5a 25 0d |...... X|%,Y%,Z%.|
|00003f90| 1e 96 0e e7 20 5a 25 3d | 30 20 8c 20 e1 0d 1e a0 |.... Z%=|0 . ....|
|00003fa0| 27 e7 20 58 25 3c 62 6f | 6e 78 25 2a 33 32 20 84 |'. X%<bo|nx%*32 .|
|00003fb0| 20 58 25 3e 28 62 6f 6e | 78 25 2b 34 29 2a 33 32 | X%>(bon|x%+4)*32|
|00003fc0| 20 8c 20 e1 0d 1e aa 1f | e7 20 62 6f 6e 79 25 3c | . .....|. bony%<|
|00003fd0| 3e 28 31 30 32 34 2d 59 | 25 29 20 81 20 33 32 20 |>(1024-Y|%) . 32 |
|00003fe0| 8c 20 e1 0d 1e b4 1e e7 | 20 62 6f 6e 25 3d 30 20 |. ......| bon%=0 |
|00003ff0| 8c 20 62 6f 6e 25 3d 31 | 20 8b 20 62 6f 6e 25 3d |. bon%=1| . bon%=|
|00004000| 30 0d 1e be 0d f2 70 72 | 69 6e 74 5f 6f 6e 0d 1e |0.....pr|int_on..|
|00004010| c8 18 f5 3a c8 97 20 58 | 25 2c 59 25 2c 5a 25 3a |...:.. X|%,Y%,Z%:|
|00004020| fd 20 5a 25 3d 30 0d 1e | d2 05 e1 0d 1e dc 05 3a |. Z%=0..|.......:|
|00004030| 0d 1e e6 12 dd a4 69 6e | 70 75 74 28 58 2c 59 2c |......in|put(X,Y,|
|00004040| 4c 29 0d 1e f0 0d ea 20 | 41 24 2c 66 69 6e 25 0d |L)..... |A$,fin%.|
|00004050| 1e fa 09 41 24 3d 22 22 | 0d 1f 04 12 f1 8a 58 2c |...A$=""|......X,|
|00004060| 59 29 3b c4 4c 2c 22 20 | 22 29 0d 1f 0e 05 f5 0d |Y);.L," |")......|
|00004070| 1f 18 0f f1 8a 58 2b a9 | 41 24 2c 59 29 3b 0d 1f |.....X+.|A$,Y);..|
|00004080| 22 0a 20 54 41 24 3d be | 0d 1f 2c 10 20 c8 8e 20 |". TA$=.|..,. .. |
|00004090| 97 28 54 41 24 29 20 ca | 0d 1f 36 33 20 20 c9 20 |.(TA$) .|..63 . |
|000040a0| 31 32 37 20 3a 20 e7 20 | a9 41 24 3e 30 20 8c 20 |127 : . |.A$>0 . |
|000040b0| 41 24 3d c0 41 24 2c a9 | 41 24 2d 31 29 3a f1 8a |A$=.A$,.|A$-1):..|
|000040c0| 58 2c 59 29 3b 41 24 3b | 22 20 22 0d 1f 40 13 20 |X,Y);A$;|" "..@. |
|000040d0| 20 c9 20 31 33 20 3a 20 | 66 69 6e 25 3d b9 0d 1f | . 13 : |fin%=...|
|000040e0| 4a 06 20 7f 0d 1f 54 19 | 20 20 e7 20 a9 41 24 3c |J. ...T.| . .A$<|
|000040f0| 4c 20 8c 20 41 24 3d 41 | 24 2b 54 41 24 0d 1f 5e |L . A$=A|$+TA$..^|
|00004100| 1c 20 20 f1 20 8a 58 2c | 59 29 3b 41 24 3b c4 4c |. . .X,|Y);A$;.L|
|00004110| 2d a9 41 24 2c 22 20 22 | 29 0d 1f 68 06 20 cb 0d |-.A$," "|)..h. ..|
|00004120| 1f 72 0c fd 20 66 69 6e | 25 3d b9 0d 1f 7c 07 3d |.r.. fin|%=...|.=|
|00004130| 41 24 0d ff | |A$.. | |
+--------+-------------------------+-------------------------+--------+--------+
